home *** CD-ROM | disk | FTP | other *** search
/ Merciful 5 / Merciful - Disc 5.iso / software / a / asim_cdfs / asimcdfsv3.8.dms / asimcdfsv3.8.adf / Install-AsimCDFS < prev    next >
Text File  |  1997-03-31  |  77KB  |  2,508 lines

  1. ;$VER: AsimCDFS Install 3.9 (28.3.97) 
  2. ;Copyright ©1993-1997 Asimware Innovations Inc.
  3.  
  4. (onerror (
  5.     (makeassign "AsimCDFSInst")
  6.     (makeassign "AsimCDFS")
  7.     (makeassign "AsimCDFS_Buffer")
  8. ))
  9.  
  10. (set #typeAMIGA 0)
  11. (set #typeCDTV 1)
  12. (set #typeCD32 2)
  13. (set #typeATAPI 3)
  14. (set #typeFLYER 4)
  15.  
  16. (set #autoMount 1)
  17. (set #CDDefault_NC "CD0" )
  18. (set #isPioneer 0)
  19. (set #isNakamichi 0)
  20. (set #isNakamichi4Disc 0)
  21. (set #isPDCD 0)
  22. (set #is4X4 0)
  23. (set #PioneerSeparate 0)
  24.  
  25. (set #wbversion (getversion "libs:version.library"))
  26. (set #wbversion (/ #wbversion 65536) )
  27.  
  28. (set #SCSIDevice "scsi.device")
  29. (set #SCSIUnit 4)
  30.  
  31. (set @default-dest "SYS:AsimCDFS")
  32.  
  33.  
  34. (set #text_mountheader (cat
  35.             "/************************************************************************/\n"
  36.             "/*  AsimCDFS v3 MountList entry -- ©1993-1997 Asimware Innovations Inc. */\n"
  37.             "/************************************************************************/\n"
  38. ))
  39.  
  40. (set #text_mountfiller (cat
  41.             "    Buffers        = 0\n"
  42.             "    BufMemType     = 5\n" 
  43.             "    Mask           = 0xffffffe\n" 
  44.             "    Flags          = 0\n" 
  45.             "    FileSystem     = l:AsimCDFS\n"
  46.             "    DosType        = 0x662dabac\n"
  47.             "    GlobVec        = -1\n"
  48.             "    Reserved       = 0\n"
  49.             "    LowCyl         = 0\n"
  50.             "    HighCyl        = 999\n"
  51.             "    Surfaces       = 1\n"
  52.             "    BlocksPerTrack = 32\n"
  53.             "    Priority       = 10\n"
  54.             "    StackSize      = 5000\n"
  55. ))
  56.  
  57.  
  58. (set #theirlevel @user-level )
  59. (user 2)
  60.  
  61. (set #English 0)
  62. (set #Deutsch 1)
  63. (set #Français 2)
  64. (set #Italiano 3)
  65. (set #Svenska 4)
  66.  
  67.  
  68. ;*****
  69. ; set the language we will be using
  70. ;
  71. (if (= @language "english") 
  72.     (set #our_language #English) 
  73. )
  74. (if (= @language "deutsch") 
  75.     (set #our_language #Deutsch) 
  76. )
  77.  
  78.  
  79. (user #theirlevel)
  80.  
  81.  
  82.  
  83.  
  84. ;*****
  85. ; set English language strings
  86. (if (= #our_language #English) (
  87.  
  88. (set #echotxt "echo \"Mounting AsimCDFS...\"\n" )
  89.  
  90. (set #text_please_use_novice  (cat
  91.              "Installation notes\n"
  92.            "------------------\n\n"
  93.              "We have noticed problems with the Installer "
  94.              "program when using Expert or Intermediate mode.  The "
  95.              "general Novice install is recommended for most, if not "
  96.              "all situations.\n"
  97. ))
  98.  
  99. (set #text_needwb_2 (cat "\n\nAmigaDOS 2.0 or higher is required for AsimCDFS 3.x. "
  100.              "\n\nAn upgrade will be needed for your Amiga."
  101.              "\n\nYou are currently running version " #wbversion "."
  102. ))
  103.  
  104.  
  105. (set #tp_insert_disk "Please insert the disk labeled \"AsimCDFS_v3_Install\"." )
  106. (set #th_insert_disk "AsimCDFS FileSystem and other utilities will be copied from this disk into your system.")
  107.  
  108.  
  109. (set #text_abort1    "\n\nApproximately ")
  110. (set #text_abort2    "K of disk space is needed on your SYS: volume.\n\nYou only have ")
  111. (set #text_abort3    "K free.\n\nDelete or transfer some files from the SYS: volume and try again.")
  112.  
  113. (set #tp_isamiga    "\nAsimCDFS v3.8 Install\n-------------------\n\Please describe your setup:")
  114. (set #th_isamiga    (cat "\n\nIf AsimCDFS is being used in conjunction with a CDTV/A570 unit "
  115.                 "then note this with the CDTV/A570 selection.\n\n"
  116.                 "If AsimCDFS is being used with a CD³² unit, then note this with the CD³² selection.\n\n"
  117.                 "Otherwise, you will be installing AsimCDFS on an Amiga equipped "
  118.                 "with a SCSI or IDE controller and SCSI or ATAPI CD-ROM drive.")
  119. )
  120.  
  121. (set #tc_isamiga_1    "Amiga with SCSI CD-ROM")
  122. (set #tc_isamiga_2    "CDTV/A570")
  123. (set #tc_isamiga_3    "CD³²")
  124. (set #tc_isamiga_4    "ATAPI CD-ROM on A4000/A1200")
  125. (set #tc_isamiga_5    "NewTek Flyer with CD-ROM (unit #6) on SCSI-C")
  126.  
  127. (set #tp_ispioneer    "\n\n\nIs your CD-ROM drive a Pioneer DRM-60x?")
  128. (set #th_ispioneer        (cat "\n\nIf you are using AsimCDFS with a Pioneer DRM-60x, indicate this "
  129.                     "in your choice.  This drive is a high-performance 6-disc minichanger and "
  130.                     "is not common."
  131.                     "\n\nOtherwise select Other CD-ROM.")
  132. )
  133.  
  134. (set #tc_othercdrom "Other CD-ROM")
  135.  
  136. (set #tp_isnakamichi        "\n\n\nIs your CD-ROM drive a Nakamichi MBR-7,\n a NEC 4xc or a NEC 2xc 7-disc CD-ROM changer?")
  137. (set #th_isnakamichi (cat "\n\nIf you are using AsimCDFS with a Nakamichi MBR-7, a NEC 4xc or a NEC 2xc 7-disc CD-ROM changer, indicate this "
  138.                     "in your choice.  This drive is a high-performance 7-disc minichanger and "
  139.                     "is not common."
  140.                     "\n\nOtherwise select Other CD-ROM.")
  141. )
  142.  
  143. (set #tp_isnakamichi4disc        "\n\n\nIs your CD-ROM drive a Nakamichi MJ-4 4-disc CD-ROM changer?")
  144. (set #th_isnakamichi4disc (cat "\n\nIf you are using AsimCDFS with a Nakamichi MJ-4 4-disc CD-ROM changer, indicate this "
  145.                     "in your choice.  This drive is a high-performance 4-disc minichanger."
  146.                     "\n\nOtherwise select Other CD-ROM.")
  147. )
  148.  
  149. (set #tp_ispd    "\n\n\nIs your drive a Panasonic LF-1000 PD/CD-ROM drive?\n(combination read/write optical drive and CD-ROM drive)")
  150. (set #th_ispd        (cat "\n\nIf you are using AsimCDFS with a Panasonic PD/CD-ROM drive, indicate this "
  151.                     "in your choice.  This drive is a combination read/write optical drive and CD-ROM drive.\n\n"
  152.                     "This drive is also bundled under 3rd party names such as Smart & Friendly and Toray.\n\n"
  153.                     "\n\nOtherwise select Other CD-ROM.")
  154. )
  155.  
  156. (set #text_lf1000_users    (cat "Panasonic LF-1000 PD/CD-ROM users\n"
  157.                       "---------------------------------\n"
  158.         "Please ensure that your drive is set to the "
  159.         "\"Two LUN Mode\".  This is done via jumper switches "
  160.         "on the back of the drive.  Consult the manufacturer's "
  161.         "documentation for further information.\n\n"
  162.         "Also ensure that your SCSI controller is setup to "
  163.         "recognize LUNs."
  164.          )
  165. )
  166.  
  167. (set #tp_is4x4        "\n\n\nIs your drive a NEC 4X4 4-disc ATAPI CD-ROM Changer?\n")
  168. (set #th_is4x4        (cat "\n\nIf you are using AsimCDFS with a NEC 4x4 ATAPI 4-disc CD-ROM Changer, indicate this "
  169.                     "in your choice.  This drive is a 1/2 height 5 1/2\" device.\n\n "
  170.                     "\n\nOtherwise select Other CD-ROM.")
  171. )
  172.  
  173. (set #tp_separatepool    "\n\nDo you wish to have separate devices mounted, or would you like all discs pooled into 1 device?\n\n")
  174. (set #th_separatepool    (cat "\n\nIf you wish to have access to all discs simultaneously, then "
  175.                         "select Separate, otherwise select Pooled  --  in the latter case, "
  176.                         "you can switch between the discs with DiscChanger.")
  177. )
  178. (set #tc_separate    "Separate")
  179. (set #tc_pooled    "Pooled")
  180.  
  181. (set #text_ourhelp_pioneer        (cat "\n\nThis is the base name under which AmigaDOS will reference the "
  182.                                 "CD-ROM as.  As you are installing AsimCDFS for a Pioneer 6-disc changer "
  183.                                 ", 6 such devices named <basename>0 through <basename>5 will be mounted (ie.  CD0, CD1, ..., CD5) "
  184.                                 "\n\nThe trailing : (colon) or the 0 through 5 MUST NOT be present.")
  185. )
  186.  
  187. (set #text_ourhelp_nakamichi    (cat "\n\nThis is the base name under which AmigaDOS will reference the "
  188.                                 "CD-ROM as.  As you are installing AsimCDFS for a Nakamichi 7-disc changer "
  189.                                 ", 7 such devices named <basename>0 through <basename>6 will be mounted (ie.  CD0, CD1, ..., CD6) "
  190.                                 "\n\nThe trailing : (colon) or the 0 through 6 MUST NOT be present.")
  191. )
  192.  
  193. (set #text_ourhelp_4x4        (cat "\n\nThis is the base name under which AmigaDOS will reference the "
  194.                                 "CD-ROM as.  As you are installing AsimCDFS for a 4-disc changer "
  195.                                 ", 4 such devices named <basename>0 through <basename>3 will be mounted (ie.  CD0, CD1, CD2 & CD3) "
  196.                                 "\n\nThe trailing : (colon) or the 0 through 3 MUST NOT be present.")
  197. )
  198.  
  199. (set #tp_basedevice    "\n\nWhat is the base-name for the AmigaDOS device?\n\n(The trailing colon MUST NOT be present.  See manual for explanation.)")
  200.  
  201. (set #tp_cddevice    "\n\nWhat is the name for the AmigaDOS device?\n\n(The trailing colon MUST NOT be present)")
  202. (set #th_cddevice    (cat "\n\nThis is the name under which AmigaDOS will reference the "
  203.                     "CD-ROM as.  While usually CD0:, "
  204.                     "it can be any name you choose. "
  205.                     "\n\nThe trailing : (colon) MUST NOT be present.")
  206. )
  207.  
  208. (set #tp_copyasimatapi    "\n\nCopying asim_atapi.device ATAPI CD-ROM driver\n")
  209. (set #th_copyasimatapi    "\n\nThis will copy the asim_atapi.device ATAPI CD-ROM driver file to your devs: directory\n")
  210.  
  211. (set #tp_runinquire    "\n\nWould you like to use the SCSI Inquire utility to locate your CD-ROM drive?")
  212. (set #th_runinquire        (cat "\n\nThe SCSI Inquire utility will scan your system for suitable SCSI "
  213.                     "or ATAPI devices and display a listing of all units connected to the device.  "
  214.                     "Your CD-ROM drive must be powered-on and correctly connected "
  215.                     "for it to be acknowledged by this utility.  Consult the SCSI Inquire "
  216.                     "chapter for more information.")
  217. )
  218.  
  219.  
  220. (set #tp_devicename        "\n\nWhat is the name of your SCSI or ATAPI device?")
  221. (set #th_devicename            (cat "\n\nThis is the name of the device driver for your particular "
  222.                     "SCSI card.  For example, the Commodore 2091/590/Amiga3000 has "
  223.                     "a name of \"scsi.device\" while our ATAPI driver has a name of \"asim_ide.device\".\n\n"
  224.                     "If you successfully ran the SCSI Inquire utility, this question will default to the correct unit number. "
  225.                     "Otherwise, consult either the AsimCDFS User's Guide or contact the controller card manufacturer.")
  226. )
  227.  
  228. (set #tp_unitnumber        "\n\nWhat is the unit number of your CD-ROM drive?")
  229. (set #th_unitnumber            (cat "\n\nThis is the unit # of the CD-ROM drive.  This is usually a "
  230.                     "numerical value between 0j and 6 for SCSI units and between 0 and 1 for ATAPI units.\n\n"
  231.                     "If you successfully ran the SCSI Inquire utility, this question will default to the correct unit number.  "
  232.                     "Otherwise, consult the CD-ROM drive documentation for instructions on "
  233.                     "determining the unit #.")
  234. )
  235.  
  236. (set #tp_automount        "\n\nWould you like the CD-ROM drive automatically mounted upon bootup?")
  237. (set #th_automount        "\n\nIf you would like, the appropriate commands will be added to your user-startup file to automatically mount AsimCDFS.\n")
  238.  
  239.  
  240. (set #tp_tunesdir        "Specify the directory in which the AsimCDFS support programs will be placed:")
  241. (set #th_tunesdir    "AsimCDFS contains a number of support programs.  This directory will specifiy where the programs will be placed.  If you need, create a separate directory for the files.")
  242.  
  243.  
  244.  
  245. (set #tp_creatingdir        "Creating the AsimCDFS: directory...")
  246. (set #th_creatingdir "This will create the specified directory for the support programs.")
  247.  
  248. (set #tp_bufferdir    "Specify the directory which can be used for buffering AsimCDFS files:")
  249. (set #th_bufferdir        (cat "AsimCDFS will require a directory in which it will buffer "
  250.                 "various files, including PhotoCD thumbnail icons, snapshot icon files "
  251.                 "and audio library files.  As the number of files in this directory "
  252.                 "may grow as your CD-ROM collection expands, it is "
  253.                 "advisable to put this directory on a large hard drive partition.")
  254. )
  255.  
  256. (set #tp_createbuffer        "Creating the AsimCDFS_Buffer: directory...")
  257. (set #th_createbuffer        "This will create the specified directory for the buffered files.")
  258.  
  259. (set #tp_createsub1        "Creating the ")
  260. (set #tp_createsub2        " directory...")
  261. (set #th_createsub            "This will create the specified directory for the buffered files.")
  262.  
  263. (set #tp_copycorel        "\n\nCopying Corel_Directory index file to the AsimCDFS_Buffer: directory.\n")
  264. (set #th_copycorel            "\n\nThis will copy an index file containing proper disc names for the Corel ProPhoto library (Volumes 1 and 2).")
  265.  
  266.  
  267. (set #tp_copyviewtek    "\n\nCopying the public domain program ViewTek by Thomas Krehbiel to your C: directory.")
  268. (set #th_copyviewtek    (cat "\n\nThis will copy over the public domain viewing "
  269.             "program ViewTek to your C: directory where it will be "
  270.             "automatically used when you double-click on PhotoCD and "
  271.             "Corel ProPhoto thumbnail icons.")
  272. )
  273.  
  274. (set #tp_deletephoto        "\n\Deleting obsolete AsimPhoto.\n")
  275. (set #th_deletephoto        (cat "\n\nThis will delete the old AsimPhoto program, which is "
  276.             "no longer required for AsimCDFS v3.x\n")
  277. )
  278.  
  279.  
  280. (set #tp_deleteprefs        "\n\Deleting obsolete preferences files.\n")
  281. (set #th_deleteprefs        (cat "\n\nThis will delete the old preferences files which are "
  282.             "no longer required for AsimCDFS v3.x\n")
  283. )
  284.  
  285.  
  286. (set #tp_copyasimcdfs    "\n\nCopying AsimCDFS FileSystem to the l: directory.\n")
  287. (set #th_copyasimcdfs        (cat"\n\nThis will copy over the AsimCDFS FileSystem program to your "
  288.         "l: directory\n\nThis is an essential step in the installation "
  289.         "process.\n")
  290. )
  291.  
  292.  
  293. (set #tp_copycdfsdevice    "\n\nCopying asimcdfs.device to the devs: directory.\n")
  294. (set #th_copycdfsdevice    (cat "\n\nThis will copy over the asimcdfs.device program to your "
  295.         "devs: directory\n\nThis is an essential step in the installation "
  296.         "process.\n")
  297. )
  298.  
  299. (set #text_abort_atapiwb    (cat "\n\nAmigaDOS 3.0 or higher is required for the asim_atapi.device.  "
  300.              "\n\nIf you are currently using an Amiga 1200 or Amiga 4000, check "
  301.              "your libs:version.library file.\n\n"
  302.              "\n\nYour libs:version.library file currently reports version ")
  303. )
  304.  
  305. (set #tp_insertmount        "Inserting MOUNT commands into the startup-sequence")
  306. (set #th_insertmount1        "\n\nThe command \"MOUNT ")
  307. (set #th_insertmount2        (cat " FROM DEVS:MOUNTLIST.xxx\" is being inserted into your "
  308.                         "\"S:Startup-Sequence\" or \"S:User-Startup\" file to "
  309.                         "automatically start AsimCDFS upon bootup.")
  310. )
  311.  
  312. (set #tp_copymounticon    "\n\nCopying Mountlist icon")
  313. (set #th_copymounticon "\n\nThis will copy over an icon for the mountlist file.")
  314.  
  315.  
  316. (set #tp_insertassign        "Inserting Assign command into the startup-sequence")
  317. (set #th_insertassign            "\n\nThe command assign AsimCDFS: and assign AsimCDFS_Buffer are being entered into your s:user-startup file.")
  318.  
  319. (set #tp_deletemountlist    "\n\Deleting obsolete MountList file from DEVS:DosDrivers/\n")
  320. (set #th_deletemountlist        (cat "\n\nThis will delete the obsolete MountList file from the DEVS:DosDrivers/ directory.  "
  321.                     "MountList files for AsimCDFS v3.x are now put into the SYS:Storage/DOSDrivers directory.\n")
  322. )
  323.  
  324. (set #tp_copyprefs        "\n\nCopying default preferences file to the ENVArc:AsimCDFS directory.\n")
  325. (set #th_copyprefs            "\n\nThis will copy over a default preferences file.")
  326.  
  327.  
  328. (set #tp_copytunes        "\n\nShould the AsimTunes utility be installed?")
  329. (set #th_copytunes            (cat "\n\nThis will copy over the AsimTunes utility "
  330.                 "to your AsimCDFS: directory\n\nIf you do not "
  331.                 "wish the AsimTunes program to be transferred to your system, "
  332.                 "skip this step.\n")
  333. )
  334. (set #tp_copyingtunes        "\n\nCopying AsimTunes audio CD controller program to the AsimCDFS: directory.\n")
  335. (set #tp_copytunesfont        "\n\nCopying AsimTunes fonts to the FONTS: directory\n")
  336. (set #th_copytunesfont            (cat "\n\nThis will copy over the fonts needed for AsimTunes.\n\n"
  337.                 "They will be placed into your fonts: directory.\n\n")
  338. )
  339.  
  340.  
  341. (set #tp_copydc        "\n\nShould the DiscChanger utility be installed?")
  342. (set #th_copydc            (cat "\n\nThis will copy over the DiscChanger utility "
  343.                 "to your AsimCDFS: directory\n\nIf you do not "
  344.                 "wish the DiscChanger program to be transferred to your system, "
  345.                 "skip this step.\n")
  346. )
  347. (set #tp_copyingdc        "\n\nCopying the DiscChanger utility to the AsimCDFS: directory.\n")
  348.  
  349. (set #tp_copypd            "\n\nShould the PD_Format utility be installed?")
  350. (set #th_copypd                (cat "\n\nThis will copy over the PD_Format utility "
  351.                     "to your AsimCDFS: directory\n\nIf you do not "
  352.                     "wish the PD_Format program to be transferred to your system, "
  353.                     "skip this step.\n")
  354. )
  355. (set #tp_copyingdc        "\n\nCopying the PD_Format utility to the AsimCDFS: directory.\n")
  356.  
  357. (set #tp_copyasimprefs        "\n\nShould the AsimCDFS_Prefs utility be installed?")
  358. (set #th_copyasimprefs            (cat "\n\nThis will copy over the AsimCDFS_Prefs utility "
  359.                 "to your AsimCDFS: directory\n\nIf you do not "
  360.                 "wish the AsimCDFS_Prefs program to be transferred to your system, "
  361.                 "skip this step.\n")
  362. )
  363. (set #tp_copyingasimprefs        "\n\nCopying the AsimCDFS_Prefs utility to the AsimCDFS: directory.\n")
  364.  
  365.  
  366. (set #tp_copysimboot        "\n\nShould the SimBoot utility be installed?")
  367. (set #th_copysimboot        (cat "\n\nThis will copy over the SimBoot utility "
  368.                 "to your AsimCDFS: directory\n\nIf you do not "
  369.                 "wish the SimBoot program to be transferred to your system, "
  370.                 "skip this step.\n")
  371. )
  372. (set #th_copyingsimboot        "\n\nCopying the SimBoot utility to the AsimCDFS: directory.\n")
  373.  
  374. (set #tp_copycd32prefs        "\n\nShould the CD³²_Prefs utility be installed?")
  375. (set #th_copycd32prefs            (cat "\n\nThis will copy over the CD³²_Prefs utility "
  376.                 "to your AsimCDFS: directory\n\nIf you do not "
  377.                 "wish the CD³²_Prefs program to be transferred to your system, "
  378.                 "skip this step.\n")
  379. )
  380.  
  381. (set #tp_copyingcd32prefs        "\n\nCopying the CD³²_Prefs utility to the AsimCDFS: directory.\n")
  382.  
  383. (set #tp_copycdtvprefs        "\n\nShould the CDTV_Prefs utility be installed?")
  384. (set #th_copycdtvprefs            (cat "\n\nThis will copy over the CDTV_Prefs utility "
  385.                 "to your AsimCDFS: directory\n\nIf you do not "
  386.                 "wish the CDTV_Prefs program to be transferred to your system, "
  387.                 "skip this step.\n")
  388. )
  389.  
  390. (set #tp_copyingcdtvprefs        "\n\nCopying the CDTV_Prefs utility to the AsimCDFS: directory.\n")
  391.  
  392. (set #tp_copycdtvemul        "\n\nShould the CDTV emulation option be installed?")
  393. (set #th_copycdtvemul            (cat "\n\nThis will copy over the required files for the "
  394.                 "CDTV emulation:\n   devs:cdtv.device\n   devs:bookmark.device\n   devs:cardmark.device\n   libs:playerprefs.library\n\nIf you do not "
  395.                 "wish the CDTV emulation option to be transferred to your system, "
  396.                 "skip this step.\n")
  397. )
  398. (set #tp_copycdtvdevice        "\n\nCopying cdtv.device to the devs: directory.\n")
  399. (set #tp_copybookmark        "\n\nCopying bookmark.device to the devs: directory.\n")
  400. (set #tp_copycardmark        "\n\nCopying cardmark.device to the devs: directory.\n")
  401. (set #tp_copyplayerprefs    "\n\nCopying playerprefs.library to the libs: directory.\n")
  402.  
  403.  
  404. (set #tp_copycd32emul    "\n\nShould the CD³² emulation option be installed?")
  405. (set #th_copycd32emul        (cat "\n\nThis will copy over the required files for the "
  406.                 "CD³² emulation:\n   devs:cd.device\n   libs:nonvolatile.library\n   libs:lowlevel.library\n\nIf you do not "
  407.                 "wish the CD³² emulation option to be transferred to your system, "
  408.                 "skip this step.\n")
  409. )
  410. (set #tp_copycddevice    "\n\nCopying cd.device to the devs: directory.\n")
  411. (set #tp_copynv        "\n\nCopying nonvolatile.library to the libs: directory.\n")
  412. (set #tp_copylowlevel    "\n\nCopying lowlevel.library to the libs: directory.\n")
  413.  
  414. (set #tp_makeenvarc        "Making the ENVARC:AsimCDFS directory, in which various default files will be placed.")
  415. (set #th_makeenvarc            "This will create a directory in your ENVARC: directory")
  416.  
  417. (set #tp_makeenv        "Making the ENV:AsimCDFS directory, in which various default files will be placed.")
  418. (set #th_makeenv            "This will create a directory in your ENV: directory")
  419. (set #tp_copyicons    "\n\nCopying default icons to the ENVARC: and ENV:AsimCDFS directory.\n")
  420. (set #th_copyicons        "\n\nThis will copy over default icon files to the ENVArc: and ENV:AsimCDFS directory.")
  421.  
  422. (set #tp_catalogs        "Which alternate language catalogs would you like installed?")
  423. (set #th_catalogs        (cat "The various programs have been configured to the following "
  424.                     "alternate languages:\n    Français, Italiano and Deutsch\n\nSelect which"
  425.                     "languages you would like to use with our software.  English "
  426.                     "language support is automatically provided as standard within the software.")
  427. )
  428. (set #tp_copylocale1        "\n\nCopying locale ")
  429. (set #tp_copylocale2        " language catalogs.\n")
  430. (set #th_copylocale    "\n\nThis will copy over the desired langauge file.")
  431.  
  432. (set #text_message_flyer        (cat "NewTek Flyer users\n"
  433.        "------------------\n"
  434.         "Your CD-ROM drive will not be automatically started upon bootup.\n\n"
  435.         "To manually start your CD-ROM drive, you must double-click on the "
  436.         "CD6 icon located in the Storage/DOSDrivers directory on your " 
  437.         "Workbench partition.\n\n"
  438.         "You may wish to leave out the CD6 icon on your Workbench screen "
  439.         "using the \"Leave Out\" menu item in Workbench."  )
  440. )
  441.  
  442.  
  443. (set #text_message_extendedicons    (cat "NewIcons and MagicWB users\n"
  444.     "--------------------------------\n"
  445.     "NewIcons and MagicWB icons are now available for "
  446.     "the utilities in AsimCDFS.  Due to space limitations, however, we "
  447.     "are unable to include these on the install disk.\n\n" 
  448.     "This set of extended icons may be found on our WWW site at "
  449.     "http://www.asimware.com, on our BBS or on the Aminet archive." )
  450. )
  451.  
  452.  
  453. ))
  454.  
  455.  
  456.  
  457.  
  458.  
  459.  
  460.  
  461. ;*****
  462. ; set German language strings
  463. (if (= #our_language #Deutsch) (
  464. (set #echotxt "echo \"AsimCDFS wird angemeldet...\"\n")
  465.  
  466. (set #text_please_use_novice (cat "Anmerkung zur Installation\n"
  467.                "--------------------------\n\n"
  468.                          "Wir haben Probleme mit dem Installer bemerkt, "
  469.                          "wenn die Modi 'geübter Benutzer' oder 'Experte' "
  470.                          "benutzt werden. Es wird dringend empfohlen, nur "
  471.                          "im Modus 'Einsteiger' zu installieren.\n"
  472.         ) )
  473.  
  474. (set #text_needwb_2 (cat "\n\nAsimCDFS 3.x benötigt AmigaDOS 2.0 oder höher. "
  475.                          "\n\nSie müssen Ihr Betriebssystem aktualisieren."
  476.                          "\n\nMomentan benutzen Sie Version " #wbversion "."
  477. ))
  478.  
  479.  
  480. (set #tp_insert_disk "Bitte legen Sie die Diskette \"AsimCDFS_v3_Install\" ein.")
  481. (set #th_insert_disk (cat "AsimCDFS und andere Hilfsprogramme werden von dieser "
  482.                         "Diskette auf Ihr System kopiert.")
  483. )
  484.  
  485.  
  486. (set #text_abort1    "\n\nEs werden ungefähr " )
  487. (set #text_abort2    "KB freier Platz auf Ihrer Bootpartition benötigt.\n\nSie haben nur ")
  488. (set #text_abort3    "KB frei.\n\nLöschen oder verschieben Sie Dateien von Ihrer Bootpartition und versuchen Sie es erneut.")
  489.  
  490. (set #tp_isamiga    "\nAsimCDFS v3.8 Installation\n---------------------------\n\Bitte geben Sie Ihre Konfiguration an:")
  491. (set #th_isamiga    (cat    "\n\nWenn AsimCDFS zusammen mit einem CDTV/A570 benutzt wird, dann "
  492.                                 "geben Sie bitte CDTV/A570 an.\n\n"
  493.                                 "Wenn AsimCDFS mit einem CD³² benutzt wird, dann wählen Sie bitte CD³² aus.\n\n"
  494.                                 "Andernfalls wird AsimCDFS für einen Amiga mit SCSI- oder ATAPI-Controller "
  495.                                 "mit einem passenden CD-ROM-Laufwerk installiert.")
  496. )
  497. (set #tc_isamiga_1    "Amiga mit SCSI CD-ROM-Laufwerk")
  498. (set #tc_isamiga_2    "CDTV/A570")
  499. (set #tc_isamiga_3    "CD³²")
  500. (set #tc_isamiga_4    "ATAPI CD-ROM-Laufwerk am A4000/A1200")
  501. (set #tc_isamiga_5    "NewTek Flyer mit CD-ROM (Unit 6) an SCSI")
  502.     
  503.  
  504. (set #tp_ispioneer    "\n\n\nIst Ihr Laufwerk ein Pioneer DRM-60x?")
  505. (set #th_ispioneer    (cat "\n\nFalls Sie AsimCDFS mit einem Pioneer DRM-60x benutzen wollen, "
  506.                                         "treffen Sie bitte die entsprechende Auswahl. Dieses Laufwerk "
  507.                                         "ist ein Hochleistungs-Diskwechsler für 6 CDs und ist nicht "
  508.                                         "sehr verbreitet."
  509.                                         "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")    
  510. )
  511.  
  512. (set #tc_othercdrom    "anderes CD-ROM-Laufwerk")
  513.  
  514. (set #tp_isnakamichi    "\n\n\nIst Ihr Laufwerk ein Nakamichi MBR-7,\nein NEC 4xc oder ein NEC 2cx Diskwechsler?"    )
  515. (set #th_isnakamichi (cat "\n\nFalls Sie AsimCDFS mit einem Nakamichi MBR-7, einem NEC 4xc oder einem NEC 2xc Diskwechsler benutzen wollen, "
  516.                                         "treffen Sie bitte die entsprechende Wahl. Dieses Laufwerk ist ein"
  517.                                         "Hochleistungs-Diskwechsler für 7 CDs und ist nicht sehr verbreitet."
  518.                                         "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")
  519. )
  520.  
  521. (set #tp_isnakamichi4disc    "\n\n\nIst Ihr Laufwerk ein Nakamichi MJ-4 Diskwechsler?"    )
  522. (set #th_isnakamichi4disc (cat "\n\nFalls Sie AsimCDFS mit einem Nakamichi MJ-4 Diskwechsler benutzen wollen, "
  523.                                         "treffen Sie bitte die entsprechende Wahl. Dieses Laufwerk ist ein"
  524.                                         "Hochleistungs-Diskwechsler für 4 CDs und ist nicht sehr verbreitet."
  525.                                         "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")
  526. )
  527.  
  528. (set #tp_ispd        "\n\n\nIst Ihr Laufwerk ein Panasonic LF-1000 PD/CD-ROM-Laufwerk?\n(Kombination aus optischem und CD-ROM-Laufwerk)"    )
  529. (set #th_ispd     (cat "\n\nFalls Sie AsimCDFS mit einem Panasonic PD/CD-ROM-Laufwerk betreiben, "
  530.                                         "treffen Sie bitte die entsprechende Wahl. Dieses Laufwerk ist eine Kombination aus einem "
  531.                                         "optischen Laufwerk (mit Schreib- und Lesezugriff) und einem CD-ROM-Laufwerk.\n"
  532.                                         "Dieses Gerät wird außerdem von Dritten angeboten unter Namen wie Smart & Friendly und Toray.\n\n"
  533.                                         "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")
  534. )
  535.  
  536. (set #text_lf1000_users    (cat "Anmerkung zum Panasonic LF-1000 PD/CD-ROM-Laufwerk\n"
  537.                       "--------------------------------------------------\n"
  538.                 "Bitte stellen Sie sicher, daß Ihr Laufwerk sich im "
  539.                 "\"Two LUN Mode\" befindet. Dies wird mittels Steckbrücken "
  540.                 "an der Rückseite des Laufwerks eingestellt. Näheres "
  541.                 "finden Sie in der Dokumentation, die dem Laufwerk beiliegt.\n\n"
  542.                 "Bitte stellen Sie außerdem sicher, daß Ihr SCSI-Controller "
  543.                 "die Erkennung von LUNs unterstützt."
  544.                 )
  545. )
  546.  
  547. (set #tp_is4x4    "\n\n\nIst Ihr Laufwerk ein NEC4x4 ATAPI Diskwechsler?\n"    )
  548. (set #th_is4x4    (cat "\n\nFalls Sie AsimCDFS mit einem NEC 4x4 ATAPI Diskwechsler benutzen, treffen Sie bitte "
  549.                                         "die entsprechende Auswahl.\n\n"
  550.                                         "\n\nAndernfalls wählen Sie bitte 'anderes CD-ROM-Laufwerk'.")    
  551. )
  552.  
  553.  
  554. (set #tp_separatepool    "\n\nMöchten Sie getrennte Geräte anmelden oder alle CD-ROMs als EIN Gerät behandeln?\n\n")
  555. (set #th_separatepool    (cat "\n\nFalls Sie Zugriff auf alle CD-ROMs gleichzeitig wünschen, wählen "
  556.                                                 "Sie bitte 'getrennt', andernfalls 'zusammen' - bei letzterem "
  557.                                                 "können Sie mit dem DiscChanger zwischen den CD-ROMs wechseln.")
  558. )
  559. (set #tc_separate    "getrennt")
  560. (set #tc_pooled    "zusammen")
  561.  
  562. (set #text_ourhelp_pioneer        (cat "\n\nDies ist der Basisname, unter dem AmigaDOS die einzelnen CD-ROMs "
  563.                                                                 "anspricht. Da Sie AsimCDFS für einen Pioneer 6-fach-Wechsler installieren, "
  564.                                                                 "werden 6 Geräte von <Basisname>0 bis <Basisname>5 angemeldet (CD0, CD1, ..., CD5). "
  565.                                                                 "\n\nEs darf kein abschließender Doppelpunkt oder die 0 bis 5 vorhanden sein.")
  566. )
  567.  
  568. (set #text_ourhelp_nakamichi    (cat "\n\nDies ist der Basisname, unter dem AmigaDOS die einzelnen CD-ROMs "
  569.                                                                 "anspricht. Da Sie AsimCDFS für einen Nakamichi 7-fach-Wechsler installieren, "
  570.                                                                 "werden 7 Geräte von <Basisname>0 bis <Basisname>6 angemeldet (CD0, CD1, ..., CD6). "
  571.                                                                 "\n\nEs darf kein abschließender Doppelpunkt oder die 0 bis 6 vorhanden sein.")
  572. )
  573.  
  574. (set #text_ourhelp_4x4        (cat "\n\nDies ist der Basisname, unter dem AmigaDOS die einzelnen CD-ROMs "
  575.                                                                 "anspricht. Da Sie AsimCDFS für einen NEC 4x4 4-fach-Wechsler installieren, "
  576.                                                                 "werden 7 Geräte von <Basisname>0 bis <Basisname>3 angemeldet (CD0, CD1, CD2 und CD3). "
  577.                                                                  "\n\nEs darf kein abschließender Doppelpunkt oder die 0 bis 3 vorhanden sein.")
  578. )
  579.  
  580. (set #tp_basedevice    "\n\nWelchen Basisnamen soll das AmigaDOS-Gerät erhalten?\n\n(Es darf kein abschließender Doppelpunkt vorhanden sein.)")
  581.  
  582. (set #tp_cddevice    "\n\nWelchen Namen soll das AmigaDOS-Gerät erhalten?\n\n(Es darf kein abschließender Doppelpunkt vorhanden sein.)")
  583. (set #th_cddevice    (cat "\n\nUnter diesem Namen wird AmigaDOS das CD-ROM-Laufwerk ansprechen. "
  584.                                         "Gebräuchlich ist CD0, Sie können aber auch einen beliebigen anderen Namen wählen. "
  585.                                         "\n\nEs darf kein abschließender Doppelpunkt vorhanden sein.")
  586. )
  587.  
  588. (set #tp_copyasimatapi    "\n\nDatei 'asim_atapi.device' kopieren\n")
  589. (set #th_copyasimatapi    "\n\nDer ATAPI CD-ROM-Treiber asim_atapi.device wird in das Verzeichnis DEVS: kopiert.\n")
  590.  
  591. (set #tp_runinquire    "\n\nMöchten Sie das Hilfsprogramm SCSI Inquire benutzen, um Ihr CD-ROM-Laufwerk zu finden?")
  592. (set #th_runinquire    (cat "\n\nDas Hilfsprogramm SCSI Inquire sucht Ihr System nach passenden "
  593.                                         "SCSI- oder ATAPI-Controllern ab und zeigt eine Liste aller angeschlossenen Geräte. "
  594.                                         "Ihr CD-ROM-Laufwerk muß korrekt angeschlossen und eingeschaltet sein, sonst "
  595.                                         "kann es vom Programm nicht erkannt werden.")    
  596. )
  597.  
  598.  
  599. (set #tp_devicename    "\n\nWie heißt Ihr SCSI- oder ATAPI-Treiber?"    )
  600. (set #th_devicename    (cat "\n\nBitte geben Sie den Namen des Treibers Ihres SCSI-Controllers "
  601.                                         "ein. Die Geräte A2091/A590 und der Amiga 3000 z.B. benutzen "
  602.                                         "\"scsi.device\", unser ATAPI-Treiber heißt \"asim_atapi.device\".\n\n"
  603.                                         "Wenn Sie das Hilfsprogramm SCSI Inquire richtig benutzt haben, dann steht im Eingabefeld bereits "
  604.                                         "der korrekte Name. Andernfalls ziehen Sie bitte die beigefügte Dokumentation zu Rate.")        
  605. )
  606.  
  607. (set #tp_unitnumber    "\n\nUnter welcher Gerätenummer wird Ihr Laufwerk angesprochen?"    )
  608. (set #th_unitnumber    (cat "\n\nBitte geben Sie die Gerätenummer Ihres CD-ROM-Laufwerks an. "
  609.                                         "Dies ist in der Regel eine Nummer zwischen 0 und 6 bei SCSI und zwischen 0 und 1 "
  610.                                         "bei ATAPI-Geräten.\n\n"
  611.                                         "Wenn Sie das Hilfsprogramm SCSI Inquire richtig benutzt haben, dann steht im Eingabefeld bereits "
  612.                                         "die korrekte Gerätenummer. Andernfalls ziehen Sie bitte die beigefügte Dokumentation zu Rate.")        
  613. )
  614.  
  615. (set #tp_automount    "\n\nSoll das CD-ROM-Laufwerk beim Hochfahren automatisch angemeldet werden?"    )
  616. (set #th_automount    "\n\nWenn Sie es wünschen, werden die benötigten Befehle in der Datei User-Startup eingebunden, um AsimCDFS automatisch anzumelden.\n"    )
  617.  
  618.  
  619. (set #tp_tunesdir    "Bitte geben Sie an, in welches Verzeichnis die Hilfsprogramme von AsimCDFS kopiert werden sollen:"    )
  620. (set #th_tunesdir    "AsimCDFS beinhaltet zahlreiche Hilfsprogramme. Hier legen Sie fest, in welches Verzeichnis sie kopiert werden. Falls nötig, erstellen Sie bitte ein eigenes Verzeichnis.")
  621.  
  622.  
  623.  
  624. (set #tp_creatingdir    "Das Verzeichnis AsimCDFS: wird angelegt..."    )
  625. (set #th_creatingdir "Es wird das angegebene Verzeichnis für die Hilfsprogramme angelegt.")
  626.  
  627. (set #tp_bufferdir    "Bitte geben Sie das Verzeichnis für die AsimCDFS-Puffer an:")
  628. (set #th_bufferdir    (cat "AsimCDFS benötigt ein Verzeichnis, in dem verschiedene Dateien "
  629.                                 "gepuffert werden können. Dazu gehören Thumbnail-Piktogramme für "
  630.                                 "PhotoCDs, fixierte Piktogramme und Audio-Kataloge. Da die Anzahl der "
  631.                                 "Dateien in diesem Verzeichnis mit Ihrer CD-ROM-Sammlung wächst, wird "
  632.                                 "empfohlen, es möglichst auf einer Partition mit viel Platz einzurichten.")    
  633. )
  634.  
  635. (set #tp_createbuffer    "Das Pufferverzeichnis für AsimCDFS wird eingerichtet..."    )
  636. (set #th_createbuffer    "Das angegebene Verzeichnis für die Pufferung von Daten wird angelegt."    )
  637.  
  638. (set #tp_createsub1    "Das Verzeichnis "    )
  639. (set #tp_createsub2    " wird angelegt..."    )
  640. (set #th_createsub        "Das angegebene Verzeichnis für die Pufferung von Daten wird angelegt."    )
  641.  
  642. (set #tp_copycorel    (cat "\n\nDie Indexdatei Corel_Directory wird in das "
  643.                              "AsimCDFS-Pufferverzeichnis (AsimCDFS_Buffer:) kopiert.\n")    )
  644. (set #th_copycorel    (cat "\n\nEine Indexdatei mit passenden Disknamen für die Corel ProPhoto "
  645.                              "Library (Vol. 1 und 2) wird kopiert.")        )
  646.  
  647.  
  648. (set #tp_copyviewtek    (cat "\n\nDas frei vertreibbare Programm ViewTek "
  649.                         "von Thomas Krehbiel wird ins Verzeichnis C: kopiert.")
  650. )
  651. (set #th_copyviewtek    (cat "\n\nDas frei vertreibbare Bildanzeigeprogramm ViewTek "
  652.                         "wird in Ihr Verzeichnis C: kopiert. Dort wird es automatisch "
  653.                         "aufgerufen, wenn Sie auf Thumbnail-Piktogramme von PhotoCDs "
  654.                         "oder Corel ProPhoto-CDs klicken.")
  655. )
  656.  
  657. (set #tp_deletephoto    "\n\Das überflüssige Programm AsimPhoto wird gelöscht.\n"    )
  658. (set #th_deletephoto        (cat "\n\nDas alte AsimPhoto-Programm wird von AsimCDFS 3.x "
  659.                         "nicht mehr benötigt und kann gelöscht werden.\n")
  660. )
  661.  
  662.  
  663. (set #tp_deleteprefs        "\n\Überflüssige Voreinstellungen für AsimCDFS werden gelöscht.\n")
  664. (set #th_deleteprefs        (cat "\n\nDie alte Voreinstellungsdatei für AsimCDFS wird von "
  665.                         "AsimCDFS 3.x nicht mehr benötigt und kann gelöscht werden.\n")
  666. )
  667.  
  668.  
  669. (set #tp_copyasimcdfs    "\n\nDas AsimCDFS Filesystem wird ins Verzeichnis L: kopiert.\n")
  670. (set #th_copyasimcdfs        (cat "\n\nDas AsimCDFS Filesystem wird in Ihr Verzeichnis L: kopiert.\n\n"
  671.                 "Dies ist ein wesentlicher Schritt bei der Installation und sollte "
  672.                 "keinesfalls ausgelassen werden.\n")
  673. )
  674.  
  675.  
  676. (set #tp_copycdfsdevice    "\n\nDie Datei asimcdfs.device wird ins Verzeichnis DEVS: kopiert.\n")
  677. (set #th_copycdfsdevice    (cat "\n\nDie Datei asimcdfs.device wird in Ihr Verzeichnis DEVS: kopiert.\n\n"
  678.                 "Dies ist ein wesentlicher Schritt bei der Installation und sollte "
  679.                 "keinesfalls ausgelassen werden.\n")
  680. )
  681.  
  682. (set #text_abort_atapiwb    (cat "\n\nFür das asim_atapi.device wird AmigaDOS 3.0 oder höher benötigt. "
  683.                          "\n\nFalls Sie einen Amiga 1200 oder Amiga 4000 benutzen, überprüfen "
  684.                          "Sie bitte die Datei LIBS:version.library.\n\n"
  685.                          "\n\nMomentan liegt LIBS:version.library in der Version " #wbversion " vor.")
  686. )
  687.  
  688. (set #tp_insertmount        "Der MOUNT-Befehl wird in die Startup-Sequence eingefügt...")
  689. (set #th_insertmount1    "\n\nDer Befehl \"MOUNT "    )
  690. (set #th_insertmount2        (cat " FROM DEVS:MOUNTLIST.xxx\" wird in die "
  691.                                                 "\"S:Startup-Sequence\" oder \"S:User-Startup\" eingefügt, "
  692.                                                 "um AsimCDFS beim Hochfahren automatisch zu starten.")
  693. )
  694.  
  695. (set #tp_copymounticon    "\n\nDas Piktogramm für die Mountlist wird kopiert")
  696. (set #th_copymounticon "\n\nDas Piktogramm für die Mountlist-Datei wird kopiert.")
  697.  
  698.  
  699. (set #tp_insertassign        "Zuweisungen werden in die User-Startup eingefügt")
  700. (set #th_insertassign        "\n\nDie Befehle ASSIGN AsimCDFS: und ASSIGN AsimCDFS_Buffer werden in die Datei S:User-Startup eingefügt."    )
  701.  
  702. (set #tp_deletemountlist    "\n\Die überflüssige Mountlist in DEVS:DOSDrivers/ wird gelöscht\n")
  703. (set #th_deletemountlist    (cat "\n\nDie überflüssige Mountlist in DEVS:DOSDrivers/ wird gelöscht. Die Mountlists "
  704.                                         "für AsimCDFS 3.x werden nun in SYS:Storage/DOSDrivers/ abgelegt.\n")    
  705. )
  706.  
  707. (set #tp_copyprefs    "\n\nStandardeinstellungen werden ins Verzeichnis ENVARC:AsimCDFS kopiert.\n"    )
  708. (set #th_copyprefs     "\n\nEine Standard-Voreinstellungsdatei wird kopiert."        )
  709.  
  710.  
  711. (set #tp_copytunes        "\n\nSoll das Hilfsprogramm AsimTunes installiert werden?")
  712. (set #th_copytunes        (cat "\n\nHiermit wird das Hilfsprogramm AsimTunes "
  713.                                 "in das Verzeichnis AsimCDFS: kopiert.\n\n"
  714.                                 "Falls Sie AsimTunes nicht installieren möchten, "
  715.                                 "überspringen Sie diesen Schritt.\n")    
  716. )
  717. (set #tp_copyingtunes    (cat "\n\nDas CD-Audio-Programm AsimTunes wird in das Verzeichnis "
  718.                                   "AsimCDFS: kopiert.\n")    )
  719. (set #tp_copytunesfont    "\n\nDie Zeichensätze für AsimTunes werden nach FONTS: kopiert\n"    )
  720. (set #th_copytunesfont            (cat "\n\nHiermit werden die von AsimTunes benötigten Zeichensätzte kopiert.\n\n"
  721.                                 "Sie werden in das Verzeichnis FONTS: übertragen.\n\n")
  722. )
  723.  
  724.  
  725. (set #tp_copydc    "\n\nSoll das Hilfsprogramm DiscChanger installiert werden?"    )
  726. (set #th_copydc    (cat "\n\nHiermit wird das Hilfsprogramm DiskChanger "
  727.                                 "in das Verzeichnis AsimCDFS: kopiert.\n\n"
  728.                                 "Falls Sie DiscChanger nicht installieren möchten, "
  729.                                 "überspringen Sie diesen Schritt.\n")        
  730. )
  731. (set #tp_copyingdc    "\n\nDas Hilfsprogramm DiscChanger wird ins Verzeichnis AsimCDFS: kopiert.\n" )
  732.  
  733. (set #tp_copypd        "\n\nSoll das Hilfsprogramm PD_Format installiert werden?"    )
  734. (set #th_copypd        (cat "\n\nHiermit wird das Hilfsprogramm PD-Format "
  735.                                         "in das Verzeichnis AsimCDFS: kopiert.\n\n"
  736.                                         "Falls Sie PD_Format nicht installieren möchten, "
  737.                                         "überspringen Sie diesen Schritt.\n")        
  738. )
  739. (set #tp_copyingdc    "\n\nDas Hilfsprogramm PD-Format wird ins Verzeichnis AsimCDFS: kopiert.\n"    )
  740.  
  741. (set #tp_copyasimprefs    "\n\nSoll das Voreinstellerprogramm AsimCDFS_Prefs installiert werden?"    )
  742. (set #th_copyasimprefs    (cat "\n\nHiermit wird das Voreinstellerprogramm AsimCDFS_Prefs "
  743.                                 "ins Verzeichnis AsimCDFS: kopiert.\n\n"
  744.                                 "Falls Sie AsimCDFS_Prefs nicht installieren möchten, "
  745.                                 "überspringen Sie diesen Schritt.\n")        
  746. )
  747. (set #tp_copyingasimprefs    "\n\nDas Voreinstellerprogramm AsimCDFS_Prefs wird ins Verzeichnis AsimCDFS: kopiert.\n"    )
  748.  
  749.  
  750. (set #tp_copysimboot    "\n\nSoll das Hilfsprogramm SimBoot installiert werden?"    )
  751. (set #th_copysimboot    (cat "\n\nHiermit wird das Hilfsprogramm SimBoot "
  752.                                 "ins Verzeichnis AsimCDFS: kopiert.\n\n"
  753.                                 "Falls Sie SimBoot nicht installieren möchten, "
  754.                                 "überspringen Sie diesen Schritt.\n")    
  755. )
  756. (set #th_copyingsimboot    "\n\nDas Hilfsprogramm SimBoot wird ins Verzeichnis AsimCDFS: kopiert.\n"    )
  757.  
  758. (set #tp_copycd32prefs    "\n\nSoll das Voreinstellungsprogramm CD³²_Prefs installiert werden?"    )
  759. (set #th_copycd32prefs    (cat "\n\nHiermit wird das Voreinstellungsprogramm "
  760.                                 "CD³²_Prefs ins Verzeichnis AsimCDFS: kopiert.\n\n"
  761.                                 "Falls Sie CD³²_Prefs nicht installieren möchten, "
  762.                                 "überspringen Sie diesen Schritt\n")        
  763. )
  764.  
  765. (set #tp_copyingcd32prefs    "\n\nDas Voreinstellungsprogramm CD³²_Prefs wird ins Verzeichnis AsimCDFS: kopiert.\n"    )
  766.  
  767. (set #tp_copycdtvprefs    "\n\nSoll das Voreinstellerprogramm CDTV_Prefs installiert werden?"    )
  768. (set #th_copycdtvprefs    (cat "\n\nHiermit wird das Voreinstellerprogramm "
  769.                                 "CDTV_Prefs ins Verzeichnis AsimCDFS: kopiert.\n\n"
  770.                                 "Falls Sie CDTV_Prefs nicht installieren möchten, "
  771.                                 "überspringen Sie diesen Schritt.\n")        
  772. )
  773.  
  774. (set #tp_copyingcdtvprefs    "\n\nDas Voreinstellerprogramm CDTV_Prefs wird ins Verzeichnis AsimCDFS: kopiert.\n"    )
  775.  
  776. (set #tp_copycdtvemul    "\n\nSoll die CDTV-Emulation installiert werden?"    )
  777. (set #th_copycdtvemul    (cat "\n\nHiermit werden die benötigten Dateien für "
  778.                                 "die CDTV-Emulation kopiert:\n   DEVS:cdtv.device\n   DEVS:bookmark.device\n   DEVS:cardmark.device\n   LIBS:playerprefs.library\n\n"
  779.                                 "Falls Sie die CDTV-Emulation nicht installieren möchten, "
  780.                                 "überspringen Sie diesen Schritt.\n")        
  781. )
  782. (set #tp_copycdtvdevice    "\n\nDatei cdtv.device wird ins Verzeichnis DEVS: kopiert.\n"    )
  783. (set #tp_copybookmark    "\n\nDatei bookmark.device wird ins Verzeichnis DEVS: kopiert.\n"    )
  784. (set #tp_copycardmark    "\n\nDatei cardmark.device wird ins Verzeichnis DEVS: kopiert.\n"    )
  785. (set #tp_copyplayerprefs    "\n\nDatei playerprefs.library wird ins Verzeichnis LIBS: kopiert.\n")
  786.  
  787.  
  788. (set #tp_copycd32emul    "\n\nSoll die CD³²-Emulation installiert werden?")
  789. (set #th_copycd32emul    (cat "\n\nHiermit werden die benötigten Dateien für die "
  790.                                 "CD³²-Emulation kopiert:\n   DEVS:cd.device\n   LIBS:nonvolatile.library\n   LIBS:lowlevel.library\n\n"
  791.                                 "Falls Sie die CD³²-Emulation nicht installieren möchten, "
  792.                                 "überspringen Sie diesen Schritt.\n")    
  793. )
  794. (set #tp_copycddevice  "\n\nDatei cd.device wird ins Verzeichnis DEVS: kopiert.\n"    )
  795. (set #tp_copynv    "\n\nDatei nonvolatile.library wird ins Verzeichnis LIBS: kopiert.\n"    )
  796. (set #tp_copylowlevel    "\n\nDatei lowlevel.library wird ins Verzeichnis LIBS: kopiert.\n")
  797.  
  798. (set #tp_makeenvarc    "Verzeichnis ENVARC:AsimCDFS für die Standardeinstellungen wird erstellt."    )
  799. (set #th_makeenvarc    "Hiermit wird ein Unterverzeichnis im Verzeichnis ENVARC: angelegt."        )
  800.  
  801. (set #tp_makeenv    "Verzeichnos ENV:AsimCDFS für die Einstellungen wird erstellt."    )
  802. (set #th_makeenv    "Hiermit wird ein Unterverzeichnis im Verzeichnis ENV: angelegt."        )
  803. (set #tp_copyicons    "\n\nStandardpiktogramme werden ins Verzeichnis ENVARC:AsimCDFS kopiert.\n")
  804. (set #th_copyicons    "\n\nHiermit werden Standardpiktogramme ins Verzeichnis ENVARC/ENV:AsimCDFS kopiert."    )
  805.  
  806. (set #tp_catalogs    "Welche Sprachen sollen installiert werden?"    )
  807. (set #th_catalogs        (cat "Die verschiedenen Programme wurden in folgende Sprachen "
  808.                                         "übersetzt:\n\n   Französisch, Italienisch und Deutsch\n\n"
  809.                                         "Wählen Sie bitte, welche Sprachen Sie benutzen wollen. "
  810.                                         "Englisch wird automatisch als Standard von der Software benutzt.")
  811. )
  812. (set #tp_copylocale1    "\n\nSprachkataloge "    )
  813. (set #tp_copylocale2    " werden kopiert.\n"    )
  814. (set #th_copylocale    "\n\nHiermit wird die gewünschte Sprache installiert.")
  815.  
  816. (set #text_message_flyer    (cat "Benutzer des NewTek Flyers\n"
  817.         "--------------------------\n"
  818.                 "Ihr CD-ROM-Laufwerk wird nicht automatisch beim Hochfahren angemeldet.\n\n"
  819.                 "Um das Gerät von Hand anzumelden, klicken Sie bitte das Piktogramm CD6 "
  820.                 "im Verzeichnis Storage/DOSDrivers auf Ihrer Bootpartition "
  821.                 "doppelt an.\n\n"
  822.                 "Sie sollten das CD6-Piktogramm eventuell auf Ihrer Workbench auslagern "
  823.                 "(mit dem Eintrag \"Auslagern\" im Menü)." )    )
  824.  
  825.  
  826. (set #text_message_extendedicons    (cat "Benutzer von NewIcons und MagicWB\n"
  827.         "---------------------------------\n"
  828.         "Für die AsimCDFS-Hilfsprogramme sind jetzt auch NewIcons- und "
  829.         "MagicWB-Piktogramme erhältlich. Leider ist es wegen des "
  830.         "beschränkten Platzes nicht möglich, diese Piktogramme auf "
  831.         "der Installationsdiskette unterzubringen.\n\n"
  832.         "Die Piktogramme können Sie aber auf unserer WWW-Seite "
  833.         "http://www.asimware.com, in unserer Mailbox oder im Aminet finden." ))
  834. ))
  835.  
  836.  
  837.  
  838.  
  839.  
  840.  
  841.  
  842.  
  843.  
  844.  
  845. (complete 0)
  846.  
  847.  
  848. ;*****
  849. ;  Please!  Use Novice!
  850. (if (> @user-level 0)
  851.     (message #text_please_use_novice)
  852. )
  853.  
  854.  
  855. ;*****
  856. ;  Need WB 2.0 or higher.
  857. (if (< #wbversion 37)
  858.     (abort #text_needwb_2)
  859. )
  860.  
  861.  
  862. ;*****
  863. ;  Lock our install disk
  864. (askdisk
  865.     (prompt #tp_insert_disk)
  866.     (help    #th_insert_disk)
  867.     (dest  "AsimCDFS_v3_Install")
  868.     (newname "AsimCDFSInst")
  869. )
  870.  
  871.  
  872.  
  873. ;*****
  874. ;  Need lots of space on sys volume for devs, l, etc.
  875. ;    assume about:  55K for asimcdfs.device
  876. ;                        110K for AsimCDFS
  877.  
  878. (set #installsize 168960)
  879. (set #installsize (+ #installsize (getsize "AsimCDFSInst:devs/asim_atapi.device") ))
  880. (set #installsize (+ #installsize (getsize "AsimCDFSInst:AsimTunes") ))
  881. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DiscChanger") ))
  882. (set #installsize (+ #installsize (getsize "AsimCDFSInst:AsimCDFS_Prefs") ))
  883. (set #installsize (+ #installsize (getsize "AsimCDFSInst:SimBoot") ))
  884. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PD_Format") ))
  885. (set #installsize (+ #installsize (getsize "AsimCDFSInst:CD³²_Prefs") ))
  886. (set #installsize (+ #installsize (getsize "AsimCDFSInst:CDTV_Prefs") ))
  887. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCDFS_Prefs.info") ))
  888. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCDTV_Prefs.info") ))
  889. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Track.info") ))
  890. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Disk.info") ))
  891. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Audio_Drawer.info") ))
  892. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PhotoCD_Disk.info") ))
  893. (set #installsize (+ #installsize (getsize "AsimCDFSInst:PhotoCD_Drawer.info") ))
  894. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Raw_Sector.info") ))
  895. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Raw_Disk.info") ))
  896. (set #installsize (+ #installsize (getsize "AsimCDFSInst:MPEG_Track.info") ))
  897. (set #installsize (+ #installsize (getsize "AsimCDFSInst:MPEG_Disk.info") ))
  898. (set #installsize (+ #installsize (getsize "AsimCDFSInst:DefaultCD³²_Prefs.info") ))
  899. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Storage/DOSDrivers/CD0") ))
  900. (set #installsize (+ #installsize (getsize "AsimCDFSInst:Storage/DOSDrivers/CD0.info") ))
  901.  
  902. (if (< (getdiskspace "SYS:") #installsize)
  903.     (abort  #text_abort1 (/ #installsize 1024) #text_abort2 (/ (getdiskspace "SYS:") 1024)    #text_abort3 )
  904. )
  905.  
  906.  
  907. (user 2)
  908.  
  909. (complete 3)
  910. ;*****
  911. ;  Ask if CDTV (1) , CD³² (2) or Amiga (0)
  912. (set #IsAmiga
  913.     (askchoice
  914.         (prompt #tp_isamiga )
  915.         (default 0 )
  916.         (choices #tc_isamiga_1 #tc_isamiga_2 #tc_isamiga_3 #tc_isamiga_4 #tc_isamiga_5 )
  917.         (help #th_isamiga )
  918.     )
  919. )
  920.  
  921. (complete 6)
  922. ;*****
  923. ;  Is CDTV
  924. (if (= #IsAmiga #typeCDTV) 
  925.     ((set #CDDefault_NC "CD1" )
  926.     (set #SCSIDevice "cdtv.device")
  927.     (set #SCSIUnit 0)
  928.     )
  929. )
  930.  
  931. ;*****
  932. ;  Is CD³²
  933. (if (= #IsAmiga #typeCD32) 
  934.     ((set #CDDefault_NC "CD1" )
  935.     (set #SCSIDevice "cd.device")
  936.     (set #SCSIUnit 0)
  937.     )
  938. )
  939.  
  940. ;*****
  941. ;  Flyer
  942. (if (= #IsAmiga #typeFLYER) 
  943.     (set #CDDefault_NC "CD6" )
  944. )
  945.  
  946.  
  947. ;*****
  948. ;  If amiga, ask if using Pioneer or other
  949. (if (= #IsAmiga #typeAMIGA)
  950.     (set #isPioneer 
  951.         (askbool
  952.             (prompt #tp_ispioneer )
  953.             (default 0)
  954.             (choices "Pioneer DRM-60x" #tc_othercdrom)
  955.             (help #th_ispioneer )
  956.         )
  957.     )
  958. )
  959.  
  960.  
  961. ;*****
  962. ;  If ispioneer==0, ask if using Nakamichi or other
  963. (if (and (= #isPioneer 0) (= #IsAmiga #typeAMIGA))
  964.     (set #isNakamichi 
  965.         (askbool
  966.             (prompt #tp_isnakamichi )
  967.             (default 0)
  968.             (choices "MBR-7 / NEC 2xc, 4xc" #tc_othercdrom)
  969.             (help #th_isnakamichi )
  970.         )
  971.     )
  972. )
  973.  
  974. ;*****
  975. ;  If ispioneer==0 & isnakamichi==0, ask if using nak4disc or other
  976. (if (and (= #isNakamichi 0) (and (= #isPioneer 0) (= #IsAmiga #typeAMIGA)) )
  977.     (set #isNakamichi4Disc 
  978.         (askbool
  979.             (prompt #tp_isnakamichi4disc )
  980.             (default 0)
  981.             (choices "MJ-4" #tc_othercdrom)
  982.             (help #th_isnakamichi4disc )
  983.         )
  984.     )
  985. )
  986.  
  987. ;*****
  988. ;  If ispioneer==0 & isnakamichi==0, isnakamichi4disc==0 ask if using PD/CD-ROM or other
  989. (if (and (= #isNakamichi 0) (and (= #isPioneer 0) (and (= #isNakamichi4Disc 0) (= #IsAmiga #typeAMIGA))) )
  990.     (set #isPDCD 
  991.         (askbool
  992.             (prompt #tp_ispd )
  993.             (default 0)
  994.             (choices "LF-1000 PD/CD-ROM" #tc_othercdrom)
  995.             (help #th_ispd )
  996.         )
  997.     )
  998. )
  999.  
  1000.  
  1001.  
  1002. (if (= #isPDCD 1)
  1003.     (message #text_lf1000_users )
  1004. )
  1005.  
  1006.  
  1007.  
  1008. ;*****
  1009. ;  If is atapi, then ask if it is a 4x4
  1010. (if (= #IsAmiga #typeATAPI) 
  1011.     (set #is4X4 
  1012.         (askbool
  1013.             (prompt #tp_is4x4 )
  1014.             (default 0)
  1015.             (choices "NEC 4X4" #tc_othercdrom)
  1016.             (help #th_is4x4 )
  1017.         )
  1018.     )
  1019. )
  1020.  
  1021. (complete 9)
  1022. (if (or #is4X4 (or #isPioneer (or #isNakamichi4Disc #isNakamichi)))
  1023.     (
  1024.     ;*****
  1025.     ;  ask if Pioneer/Nakamichi/NEC is separate or pooled
  1026.     (set #PioneerSeparate
  1027.             (askbool
  1028.                 (prompt #tp_separatepool )
  1029.                 (default 0 )
  1030.                 (choices #tc_separate #tc_pooled)
  1031.                 (help #th_separatepool )
  1032.             )
  1033.         )
  1034.  
  1035.  
  1036.  
  1037.     ;*****
  1038.     ;  If pioneer separate, ask for base name
  1039.     (if #PioneerSeparate
  1040.         ((if #isPioneer
  1041.             (set #ourhelp #text_ourhelp_pionner )
  1042.         )
  1043.     
  1044.         (if #isNakamichi
  1045.             (set #ourhelp #text_ourhelp_nakamichi )
  1046.         )
  1047.  
  1048.         (if (or #is4X4 #isNakamichi4Disc)
  1049.             (set #ourhelp #text_ourhelp_4x4 )
  1050.         )
  1051.     
  1052.         (set #CDDevice_NC 
  1053.                 (askstring
  1054.                     (prompt #tp_basedevice )
  1055.                     (default "CD" )
  1056.                     (help #ourhelp)
  1057.                 )
  1058.             )
  1059.         (set #CDDevice (cat #CDDevice_NC "0:")))
  1060.         )
  1061.     )
  1062. )
  1063.  
  1064.  
  1065. ;*****
  1066. ;  If pioneer pooled or other CD-ROM, ask for CD0 device alternate
  1067. (if (not #PioneerSeparate)
  1068.     ((set #CDDevice_NC 
  1069.         (askstring
  1070.             (prompt #tp_cddevice )
  1071.             (default #CDDefault_NC )
  1072.             (help #th_cddevice )
  1073.         )
  1074.     )
  1075.  
  1076.     (set #CDDevice (cat #CDDevice_NC ":") ))
  1077. )
  1078.  
  1079.  
  1080. ;*****
  1081. ;  Copy over asim_atapi.device
  1082. (if (= #IsAmiga #typeATAPI)
  1083.     ((user #theirlevel)
  1084.  
  1085.     (copyfiles
  1086.         (prompt #tp_copyasimatapi )
  1087.         (source "AsimCDFSInst:devs/asim_atapi.device")
  1088.         (dest "DEVS:")
  1089.         (confirm)
  1090.         (help #th_copyasimatapi)
  1091.     )
  1092.  
  1093.     (user 2)
  1094.     )
  1095. )
  1096.  
  1097. ;*****
  1098. ;  Ask to run SCSI Inquire
  1099. (if (or (= #IsAmiga #typeAMIGA) (= #IsAmiga #typeATAPI))
  1100.     (set #useInquire
  1101.         (askbool
  1102.             (prompt #tp_runinquire )
  1103.             (default 1 )
  1104.             (help #th_runinquire )
  1105.         )
  1106.     )
  1107. )
  1108.  
  1109.  
  1110. ;*****
  1111. ;  Run SCSI Inquire
  1112. (if #useInquire
  1113.     (
  1114.     (if (= #IsAmiga #typeATAPI)
  1115.         (run "AsimCDFS_v3_Install:SCSI_Inquire force_atapi")    
  1116.     )
  1117.  
  1118.     (if (= #IsAmiga #typeAMIGA)
  1119.         (run "AsimCDFS_v3_Install:SCSI_Inquire")    
  1120.     )
  1121.     
  1122.     (if (exists "ENV:SCSI_Device")
  1123.         ((set #SCSIDevice (getenv "SCSI_Device"))
  1124.         (set #SCSIUnit (+ (getenv "SCSI_Unit")))
  1125.         ))
  1126.     )
  1127. )
  1128.  
  1129.  
  1130.  
  1131. ;*****
  1132. ;  The LF-1000 PD/CD-ROM drive uses LUN #1 for the CD-ROM operation
  1133. (if (= #isPDCD 1)
  1134.     (set #SCSIUnit (+ 10 #SCSIUnit))
  1135. )
  1136.  
  1137.  
  1138. (complete 12)
  1139. (if (= #IsAmiga #typeAMIGA)
  1140.     ;*****
  1141.     ;  Ask for device name
  1142.     ((set #SCSIDevice 
  1143.         (askstring
  1144.             (prompt #tp_devicename )
  1145.             (default #SCSIDevice )
  1146.             (help #th_devicename )
  1147.         )
  1148.     )
  1149.     
  1150.     (complete 15)
  1151.     ;****
  1152.     ;  Ask for unit number
  1153.     (set #SCSIUnit 
  1154.         (asknumber
  1155.             (prompt #tp_unitnumber )
  1156.             (default #SCSIUnit )
  1157.             (help #th_unitnumber )
  1158.         )
  1159.     ))
  1160. )
  1161.  
  1162.  
  1163. ;*****
  1164. ;  Ask for automount?
  1165. (complete 18)
  1166. (if (not (= #IsAmiga #typeFLYER))
  1167.     (set #autoMount
  1168.         (askbool
  1169.             (prompt #tp_automount )
  1170.             (help #th_automount)
  1171.             (default 1)
  1172.         )
  1173.     )
  1174. )
  1175.  
  1176. (if (= #IsAmiga #typeFLYER)
  1177.     ((set #autoMount 0)
  1178.     (set #SCSIUnit 206)
  1179.     (set #SCSIDevice "flyerscsi.device"))
  1180. )
  1181.  
  1182.  
  1183. (set #mountDirectory "sys:storage/DOSDrivers/")
  1184.  
  1185.  
  1186.  
  1187. ;*****
  1188. ;  Ask for AsimCDFS:
  1189. (set #tunesDir
  1190.     (askdir
  1191.         (prompt #tp_tunesdir )
  1192.         (help #th_tunesdir)
  1193.         (default @default-dest)
  1194.         (newpath)
  1195.     )
  1196. )
  1197.  
  1198. (if (not (exists #tunesDir (noreq)))
  1199.     (makedir #tunesDir
  1200.         (prompt #tp_creatingdir)
  1201.         (help #th_creatingdir)
  1202.         (infos)
  1203.         )
  1204. )
  1205. (makeassign "AsimCDFS" #tunesDir)
  1206.  
  1207.  
  1208. ;*****
  1209. ;  Ask for AsimCDFS_Buffer:
  1210. (set #bufferDir "Work:AsimCDFS_Buffer")
  1211. (run "AsimCDFS_v3_Install:c/MostFree")    
  1212.     
  1213. (if (exists "ENV:MostFree")
  1214.     (set #bufferDir (cat (getenv "MostFree") "AsimCDFS_Buffer"))
  1215. )
  1216.  
  1217. (if (= #IsAmiga #typeFLYER)
  1218.     (if (exists "WORK:" (noreq))
  1219.         (set #bufferDir "WORK:AsimCDFS_Buffer")
  1220.         (set #bufferDir "SYS:AsimCDFS_Buffer")
  1221.     )
  1222.     
  1223. )
  1224.  
  1225.  
  1226. (set #bufferDir
  1227.     (askdir
  1228.         (prompt #tp_bufferdir )
  1229.         (help #th_bufferdir )
  1230.         (default #bufferDir )
  1231.         (newpath)
  1232.     )
  1233. )
  1234.  
  1235. (if (not (exists #bufferDir (noreq)))
  1236.     (makedir #bufferDir
  1237.         (prompt #tp_createbuffer)
  1238.         (help #th_createbuffer)
  1239.         (infos)
  1240.         )
  1241. )
  1242. (makeassign "AsimCDFS_Buffer" #bufferDir)
  1243. (user #theirlevel)
  1244.  
  1245.  
  1246. (set n 0)
  1247. (while
  1248.     (set #buffsubdir 
  1249.         (select n "AsimCDFS_Buffer:PhotoCDIcon_Buffer"
  1250.                      "AsimCDFS_Buffer:Audio"
  1251.                      "AsimCDFS_Buffer:Raw"
  1252.                      "AsimCDFS_Buffer:Marks"
  1253.                      "AsimCDFS_Buffer:NonVolatile"
  1254.                    ""
  1255.             )
  1256.         )
  1257.     (
  1258.     (if (not (exists #buffsubdir (noreq)))
  1259.         (makedir #buffsubdir
  1260.             (prompt #tp_createsub1 #buffsubdir )
  1261.             (help #th_createsub )
  1262.             (infos)
  1263.             )
  1264.     )
  1265.  
  1266.     (set n (+ n 1))
  1267.     )
  1268. )
  1269.  
  1270.  
  1271. (copyfiles
  1272.     (prompt #tp_copycorel )
  1273.     (source "AsimCDFSInst:Corel_Directory")
  1274.     (dest "AsimCDFS_Buffer:")
  1275.     (confirm)
  1276.     (help #th_copycorel)
  1277. )
  1278.  
  1279.  
  1280.  
  1281. (if (not (exists "C:ViewTek" (noreq)))
  1282.     ((copyfiles
  1283.         (prompt #tp_copyviewtek)
  1284.         (source "AsimCDFSInst:C/VT")
  1285.         (dest "C:")
  1286.         (newname "ViewTek")
  1287.         (help #th_copyviewtek)
  1288.         (confirm)
  1289.     ))
  1290. )
  1291.  
  1292.  
  1293.  
  1294. ;*****
  1295. ;  delete obsolete files
  1296. ;  Delete old AsimPhoto, if present in AsimCDFS dir.
  1297. ;  all other files are either the user's or will be over written
  1298. (if (exists "AsimCDFS:AsimPhoto")
  1299.     ((delete "AsimCDFS:AsimPhoto"
  1300.         (prompt #tp_deletephoto )
  1301.         (confirm)
  1302.         (help #th_deletephoto )
  1303.         )
  1304.     )
  1305. )        
  1306.  
  1307.  
  1308. (if (exists "AsimCDFS:AsimPhoto.info")
  1309.     ((delete "AsimCDFS:AsimPhoto.info"
  1310.         (prompt #tp_deletephoto )
  1311.         (confirm)
  1312.         (help #th_deletephoto )
  1313.         )
  1314.     )
  1315. )        
  1316.  
  1317. (if (exists "ENVARC:AsimCDFS/Photo.info")
  1318.     ((delete "ENVARC:AsimCDFS/Photo.info"
  1319.         (prompt #tp_deletephoto )
  1320.         (confirm)
  1321.         (help #th_deletephoto )
  1322.         )
  1323.     )
  1324. )        
  1325.  
  1326.  
  1327. (if (exists "ENVARC:AsimCDFS/DiscChanger.prefs")
  1328.     ((delete "ENVARC:AsimCDFS/DiscChanger.prefs"
  1329.         (prompt #tp_deleteprefs )
  1330.         (confirm)
  1331.         (help #th_deleteprefs )
  1332.         )
  1333.     )
  1334. )        
  1335.  
  1336. (if (exists "ENVARC:AsimCDFS/AsimTunes.prefs")
  1337.     ((delete "ENVARC:AsimCDFS/AsimTunes.prefs"
  1338.         (prompt #tp_deleteprefs )
  1339.         (confirm)
  1340.         (help #th_deleteprefs )
  1341.         )
  1342.     )
  1343. )        
  1344.  
  1345.  
  1346. (if (exists "ENVARC:AsimCDFS/AsimPhoto.prefs")
  1347.     ((delete "ENVARC:AsimCDFS/AsimPhoto.prefs"
  1348.         (prompt #tp_deleteprefs )
  1349.         (confirm)
  1350.         (help #th_deleteprefs )
  1351.         )
  1352.     )
  1353. )        
  1354.  
  1355.  
  1356.  
  1357. ;*****
  1358. ;  l:AsimCDFS
  1359. (complete 21)
  1360. (protect "l:AsimCDFS" "rwed" )
  1361. (run "AsimCDFSInst:c/lx e AsimCDFSInst:l/AsimCDFS.lha l:"
  1362.     (prompt #tp_copyasimcdfs )
  1363.     (confirm)
  1364.     (help #th_copyasimcdfs )
  1365. )
  1366.  
  1367.  
  1368.  
  1369. ;*****
  1370. ;  devs:asimcdfs.device
  1371. (complete 25)
  1372. (protect "devs:asimcdfs.device" "rwed" )
  1373. (run "AsimCDFSInst:c/lx e AsimCDFSInst:devs/asimcdfs.lha devs:"
  1374.     (prompt #tp_copycdfsdevice )
  1375.     (confirm)
  1376.     (help #th_copycdfsdevice )
  1377. )
  1378.  
  1379.  
  1380.  
  1381.  
  1382.  
  1383. ;*****
  1384. ;  Create PD0 mountlist for PD/CD-ROM drive
  1385. ;(if (= #isPDCD 1)
  1386. ;    (
  1387. ;    )
  1388. ;)
  1389.  
  1390.  
  1391.  
  1392. (if (and (= #IsAmiga #typeATAPI) (< #wbversion 39) )
  1393.     (abort #text_abort_atapiwb #wbversion ".")
  1394. )
  1395.  
  1396.  
  1397. ;*****
  1398. ;  Create mountlists and alter user-startup
  1399. ;
  1400. ;  no need to worry about NEC 4X4 as the atapi.device requires WB3.0 or above
  1401. ;  (at this time!)
  1402. ;*****
  1403. (if (= #wbversion 37) 
  1404.     ((if #PioneerSeparate
  1405.         ((set #startupCommand1 (cat "mount >NIL: " #CDDevice_NC "0: from devs:MountList." #CDDevice_NC "\n") )
  1406.         (set #startupCommand2 (cat "mount >NIL: " #CDDevice_NC "1: from devs:MountList." #CDDevice_NC "\n") )
  1407.         (set #startupCommand3 (cat "mount >NIL: " #CDDevice_NC "2: from devs:MountList." #CDDevice_NC "\n") )
  1408.         (set #startupCommand4 (cat "mount >NIL: " #CDDevice_NC "3: from devs:MountList." #CDDevice_NC "\n") )
  1409.         (set #startupCommand5 (cat "mount >NIL: " #CDDevice_NC "4: from devs:MountList." #CDDevice_NC "\n") )
  1410.         (if #isPioneer
  1411.             (set #startupCommand6 (cat #startupCommand5 "mount >NIL: " #CDDevice_NC "5: from devs:MountList." #CDDevice_NC "\n") )
  1412.         )
  1413.         (if #isNakamichi
  1414.             (set #startupCommand6 (cat #startupCommand5 "mount >NIL: " #CDDevice_NC "5: from devs:MountList." #CDDevice_NC "\n" "mount >NIL: " #CDDevice_NC "6: from devs:MountList." #CDDevice_NC "\n") )
  1415.         )
  1416.             
  1417.         
  1418.         (if #autoMount
  1419.             ((protect "S:User-Startup" "rwed" )
  1420.             (protect "S:Startup-Sequence" "rwed" )
  1421.             
  1422.             (startup "AsimCDFS"
  1423.                 (command #echotxt)
  1424.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1425.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1426.                 (command #startupCommand1 )
  1427.                 (command #startupCommand2 )
  1428.                 (command #startupCommand3 )
  1429.                 (command #startupCommand4 )
  1430.                 (command #startupCommand6 )
  1431.                 (prompt #tp_insertmount)
  1432.                 (help #th_insertmount1 #CDDevice_NC #th_insertmount2)
  1433.             ))
  1434.         ))
  1435.     )
  1436.  
  1437.     (if (not #PioneerSeparate)
  1438.         ((set #startupCommand (cat "mount >NIL: " #CDDevice " from devs:MountList." #CDDevice_NC "\n") )
  1439.         (if #autoMount
  1440.             ((protect "S:User-Startup" "rwed" )
  1441.             (protect "S:Startup-Sequence" "rwed" )
  1442.             
  1443.             (startup "AsimCDFS"
  1444.                 (command #echotxt)
  1445.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1446.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1447.                 (command #startupCommand )
  1448.                 (prompt #tp_insertmount)
  1449.                 (help #th_insertmount1 #CDDevice #th_insertmount2)
  1450.             ))
  1451.         ))
  1452.     )
  1453.  
  1454.     
  1455.     (if (not #autoMount)
  1456.         ((protect "S:User-Startup" "rwed" )
  1457.         (protect "S:Startup-Sequence" "rwed" )
  1458.         
  1459.         (startup "AsimCDFS"
  1460.             (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1461.             (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1462.             (prompt #tp_insertmount)
  1463.             (help #th_insertmount1 #CDDevice #th_insertmount2)
  1464.         ))
  1465.     )
  1466.  
  1467.     (protect (cat "devs:MountList." #CDDevice_NC) "rwed" )
  1468.  
  1469.     (set #Mount_Five 
  1470.         (cat
  1471.             #CDDevice_NC "4:\n"
  1472.             "    Device         = " #SCSIDevice "\n" 
  1473.             "    Unit           = "(+ 40 #SCSIUnit) "\n" 
  1474.             "    Mount          = 1\n"
  1475.             #text_mountfiller
  1476.             "#\n\n"
  1477.             #CDDevice_NC "5:\n"
  1478.             "    Device         = " #SCSIDevice "\n" 
  1479.             "    Unit           = "(+ 50 #SCSIUnit) "\n" 
  1480.             "    Mount          = 1\n"
  1481.             #text_mountfiller
  1482.             "#\n\n"
  1483.         )
  1484.     )
  1485.  
  1486.  
  1487.     (if #isPioneer 
  1488.         (set #LastLine (cat #Mount5 "\n"))
  1489.     )
  1490.  
  1491.     (if #isNakamichi 
  1492.         (set #LastLine (cat    #Mount5
  1493.                             #CDDevice_NC "6:\n"
  1494.                             "    Device         = " #SCSIDevice "\n"
  1495.                             "    Unit           = "(+ 60 #SCSIUnit) "\n"
  1496.                             "    Mount          = 1\n"
  1497.                             #text_mountfiller
  1498.                             "#\n\n"
  1499.                             )
  1500.             )
  1501.         )
  1502.                             
  1503.     (if #isNakamichi4Disc
  1504.         (set #LastLine "\n")
  1505.     )
  1506.  
  1507.  
  1508.     (if #PioneerSeparate
  1509.         (textfile
  1510.             (dest (cat "devs:MountList." #CDDevice_NC) )
  1511.             (append #text_mountheader)
  1512.             (append #CDDevice_NC "0:\n")
  1513.             (append "    Device         = " #SCSIDevice "\n" )
  1514.             (append "    Unit           = "(+ 00 #SCSIUnit) "\n" )
  1515.             (append "    Mount          = 1\n")
  1516.             (append #text_mountfiller)
  1517.             (append "#\n\n")
  1518.             (append #CDDevice_NC "1:\n")
  1519.             (append "    Device         = " #SCSIDevice "\n" )
  1520.             (append "    Unit           = "(+ 10 #SCSIUnit) "\n" )
  1521.             (append "    Mount          = 1\n")
  1522.             (append #text_mountfiller)
  1523.             (append "#\n\n")
  1524.             (append #CDDevice_NC "2:\n")
  1525.             (append "    Device         = " #SCSIDevice "\n" )
  1526.             (append "    Unit           = "(+ 20 #SCSIUnit) "\n" )
  1527.             (append "    Mount          = 1\n")
  1528.             (append #text_mountfiller)
  1529.             (append "#\n\n")
  1530.             (append #CDDevice_NC "3:\n")
  1531.             (append "    Device         = " #SCSIDevice "\n" )
  1532.             (append "    Unit           = "(+ 30 #SCSIUnit) "\n" )
  1533.             (append "    Mount          = 1\n")
  1534.             (append #text_mountfiller)
  1535.             (append "#\n\n")
  1536.             (append #LastLine )
  1537.         )
  1538.     )
  1539.  
  1540.  
  1541.  
  1542.     (if (not #PioneerSeparate)
  1543.         (textfile
  1544.             (dest (cat "devs:MountList." #CDDevice_NC) )
  1545.             (append #text_mountheader)
  1546.             (append #CDDevice "\n")
  1547.             (append "    Device         = " #SCSIDevice "\n" )
  1548.             (append "    Unit           = " #SCSIUnit "\n" )
  1549.             (append "    Mount          = " #autoMount "\n")
  1550.             (append #text_mountfiller)
  1551.             (append "#\n")
  1552.         )
  1553.     ))
  1554. )
  1555.  
  1556.  
  1557.  
  1558. (if (> #wbversion 37) 
  1559.     ((if (not #PioneerSeparate)
  1560.         ((textfile
  1561.             (dest (cat #mountDirectory #CDDevice_NC) )
  1562.             (append #text_mountheader)
  1563.             (append "    Device         = " #SCSIDevice "\n" )
  1564.             (append "    Unit           = " #SCSIUnit "\n" )
  1565.             (append "    Mount          = 1\n")
  1566.             (append #text_mountfiller)
  1567.         )
  1568.  
  1569.         (copyfiles
  1570.                 (prompt #tp_copymounticon)
  1571.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1572.                 (dest #mountDirectory)
  1573.                 (newname (cat #CDDevice_NC ".info"))
  1574.                 (help #th_copymounticon)
  1575.                 (confirm)
  1576.             )        
  1577.  
  1578.     ))
  1579.  
  1580.  
  1581.     (if #PioneerSeparate
  1582.         ((textfile
  1583.             (dest (cat #mountDirectory #CDDevice_NC "0") )
  1584.             (append #text_mountheader)
  1585.             (append "    Device         = " #SCSIDevice "\n" )
  1586.             (append "    Unit           = "(+ 00 #SCSIUnit) "\n" )
  1587.             (append "    Mount          = 1\n")
  1588.             (append #text_mountfiller)
  1589.         )
  1590.  
  1591.         (copyfiles
  1592.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1593.                 (dest #mountDirectory)
  1594.                 (newname (cat #CDDevice_NC "0.info"))
  1595.                 (prompt #tp_copymounticon)
  1596.                 (help #th_copymounticon)
  1597.                 (confirm)
  1598.             )
  1599.         
  1600.         (textfile
  1601.             (dest (cat #mountDirectory #CDDevice_NC "1") )
  1602.             (append #text_mountheader)
  1603.             (append "    Device         = " #SCSIDevice "\n" )
  1604.             (append "    Unit           = "(+ 10 #SCSIUnit) "\n" )
  1605.             (append "    Mount          = 1\n")
  1606.             (append #text_mountfiller)
  1607.         )
  1608.  
  1609.         (copyfiles
  1610.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1611.                 (dest #mountDirectory)
  1612.                 (newname (cat #CDDevice_NC "1.info"))
  1613.                 (prompt #tp_copymounticon)
  1614.                 (help #th_copymounticon)
  1615.                 (confirm)
  1616.             )
  1617.  
  1618.         (textfile
  1619.             (dest (cat #mountDirectory #CDDevice_NC "2") )
  1620.             (append #text_mountheader)
  1621.             (append "    Device         = " #SCSIDevice "\n" )
  1622.             (append "    Unit           = "(+ 20 #SCSIUnit) "\n" )
  1623.             (append "    Mount          = 1\n")
  1624.             (append #text_mountfiller)
  1625.         )
  1626.         
  1627.  
  1628.         (copyfiles
  1629.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1630.                 (dest #mountDirectory)
  1631.                 (newname (cat #CDDevice_NC "2.info"))
  1632.                 (prompt #tp_copymounticon)
  1633.                 (help #th_copymounticon)
  1634.                 (confirm)
  1635.             )
  1636.  
  1637.         (textfile
  1638.             (dest (cat #mountDirectory #CDDevice_NC "3") )
  1639.             (append #text_mountheader)
  1640.             (append "    Device         = " #SCSIDevice "\n" )
  1641.             (append "    Unit           = "(+ 30 #SCSIUnit) "\n" )
  1642.             (append "    Mount          = 1\n")
  1643.             (append #text_mountfiller)
  1644.         )
  1645.         
  1646.         (copyfiles
  1647.                 (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1648.                 (dest #mountDirectory)
  1649.                 (newname (cat #CDDevice_NC "3.info"))
  1650.                 (prompt #tp_copymounticon)
  1651.                 (help #th_copymounticon)
  1652.                 (confirm)
  1653.             )
  1654.  
  1655.         (if (or #isPioneer #isNakamichi)
  1656.             ((textfile
  1657.                 (dest (cat #mountDirectory #CDDevice_NC "4") )
  1658.                 (append #text_mountheader)
  1659.                 (append "    Device         = " #SCSIDevice "\n" )
  1660.                 (append "    Unit           = "(+ 40 #SCSIUnit) "\n" )
  1661.                 (append "    Mount          = 1\n")
  1662.                 (append #text_mountfiller)
  1663.             )
  1664.     
  1665.             (copyfiles
  1666.                     (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1667.                     (dest #mountDirectory)
  1668.                     (newname (cat #CDDevice_NC "4.info"))
  1669.                     (prompt #tp_copymounticon)
  1670.                     (help #th_copymounticon)
  1671.                     (confirm)
  1672.                 )
  1673.     
  1674.             (textfile
  1675.                 (dest (cat #mountDirectory #CDDevice_NC "5") )
  1676.                 (append #text_mountheader)
  1677.                 (append "    Device         = " #SCSIDevice "\n" )
  1678.                 (append "    Unit           = "(+ 50 #SCSIUnit) "\n" )
  1679.                 (append "    Mount          = 1\n")
  1680.                 (append #text_mountfiller)
  1681.             )
  1682.             (copyfiles
  1683.                     (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1684.                     (dest #mountDirectory)
  1685.                     (newname (cat #CDDevice_NC "5.info"))
  1686.                     (prompt #tp_copymounticon)
  1687.                     (help #th_copymounticon)
  1688.                     (confirm)
  1689.                 )
  1690.     
  1691.             (if #isNakamichi
  1692.                 ((textfile
  1693.                     (dest (cat #mountDirectory #CDDevice_NC "6") )
  1694.                     (append #text_mountheader)
  1695.                     (append "    Device         = " #SCSIDevice "\n" )
  1696.                     (append "    Unit           = "(+ 60 #SCSIUnit) "\n" )
  1697.                     (append "    Mount          = 1\n")
  1698.                     (append #text_mountfiller)
  1699.                 )
  1700.                 (copyfiles
  1701.                         (source "AsimCDFSInst:Storage/DOSDrivers/CD0.info")
  1702.                         (dest #mountDirectory)
  1703.                         (newname (cat #CDDevice_NC "6.info"))
  1704.                         (prompt #tp_copymounticon)
  1705.                         (help #th_copymounticon)
  1706.                         (confirm)
  1707.                 ))
  1708.             ))
  1709.         )
  1710.     ))
  1711.  
  1712.  
  1713.     (protect "S:User-Startup" "rwed" )
  1714.     (protect "S:Startup-Sequence" "rwed" )
  1715.  
  1716.     (if (not #autoMount)
  1717.         (startup "AsimCDFS"
  1718.             (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1719.             (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1720.             (prompt #tp_insertassign)
  1721.             (help #th_insertassign)
  1722.             )
  1723.         )
  1724.  
  1725.  
  1726.  
  1727.     (if #autoMount
  1728.         ((if #isPioneer
  1729.             (set #mountCommand6 (cat "\nmount >NIL: " #CDDevice_NC "4:\n" "mount >NIL: " #CDDevice_NC "5:\n") )
  1730.             )
  1731.         (if #isNakamichi
  1732.             (set #mountCommand6 (cat "\nmount >NIL: " #CDDevice_NC "4:\n" "mount >NIL: " #CDDevice_NC "5:\n" "mount >NIL: " #CDDevice_NC "6:\n") )
  1733.             )
  1734.         (if (or #is4X4 #isNakamichi4Disc)
  1735.             (set #mountCommand6 "\n")
  1736.             )
  1737.  
  1738.  
  1739.         (if #PioneerSeparate
  1740.             (startup "AsimCDFS"
  1741.                 (command #echotxt)
  1742.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1743.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1744.                 (command (cat "mount >NIL: " #CDDevice_NC "0:\n") )
  1745.                 (command (cat "mount >NIL: " #CDDevice_NC "1:\n") )
  1746.                 (command (cat "mount >NIL: " #CDDevice_NC "2:\n") )
  1747.                 (command (cat "mount >NIL: " #CDDevice_NC "3:") )
  1748.                 (command #mountCommand6 )
  1749.                 (prompt #tp_insertassign)
  1750.                 (help #th_insertassign)
  1751.                 )
  1752.             )
  1753.             
  1754.         (if (not #PioneerSeparate)
  1755.             (startup "AsimCDFS"
  1756.                 (command #echotxt)
  1757.                 (command (cat "assign AsimCDFS: \"" #tunesDir "\"\n"))
  1758.                 (command (cat "assign AsimCDFS_Buffer: \"" #bufferDir "\"\n"))
  1759.                 (command (cat "mount >NIL: " #CDDevice "\n") )
  1760.                 (prompt #tp_insertassign)
  1761.                 (help #th_insertassign)
  1762.                 )
  1763.             )            
  1764.         )
  1765.     )
  1766. ))
  1767.  
  1768.  
  1769. ;*****
  1770. ;  Delete old mountlists is DEVS:DosDrivers/
  1771. (if (> #wbversion 37) 
  1772.     ((if (not #PioneerSeparate)
  1773.         ((if (exists (cat "DEVS:DosDrivers/" #CDDevice_NC))
  1774.             ((delete (cat "DEVS:DosDrivers/" #CDDevice_NC)
  1775.             (confirm)
  1776.             (prompt #tp_deletemountlist )
  1777.             (help #tp_deletemountlist )
  1778.             )
  1779.  
  1780.             (delete (cat "DEVS:DosDrivers/" #CDDevice_NC ".info")
  1781.             (confirm)
  1782.             (prompt #tp_deletemountlist )
  1783.             (help #tp_deletemountlist )
  1784.             )
  1785.             )
  1786.         ))
  1787.     ))
  1788.  
  1789.     (if #PioneerSeparate
  1790.         ((set n 0)
  1791.         (while
  1792.             (set #oldml
  1793.                 (select n (cat "DEVS:DosDrivers/" #CDDevice_NC "0")
  1794.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "1")
  1795.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "2")
  1796.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "3")
  1797.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "4")
  1798.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "5")
  1799.                              (cat "DEVS:DosDrivers/" #CDDevice_NC "6")
  1800.                            ""
  1801.                     )
  1802.                 )
  1803.                 
  1804.             
  1805.             ((if (exists #oldml)
  1806.                 ((delete #oldml
  1807.                 (confirm)
  1808.                 (prompt #tp_deletemountlist )
  1809.                 (help #tp_deletemountlist )
  1810.                 )
  1811.  
  1812.  
  1813.                 (delete (cat #oldml ".info")
  1814.                 (confirm)
  1815.                 (prompt #tp_deletemountlist )
  1816.                 (help #tp_deletemountlist )
  1817.                 )
  1818.                 )
  1819.             )        
  1820.  
  1821.             (set n (+ n 1)))
  1822.             )
  1823.         )
  1824. ))
  1825.  
  1826. ;*****
  1827. ;  Default prefs files
  1828. (if (or (= #IsAmiga #typeAMIGA) (= #IsAmiga #typeFLYER))
  1829.     ((if (or #isPioneer (or #isNakamichi4Disc #isNakamichi))
  1830.         ;*****
  1831.         ;  Default prefs file for a Pioneer drive, separate
  1832.         ((if #PioneerSeparate
  1833.             ((copyfiles
  1834.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1835.                 (dest "ENVArc:AsimCDFS")
  1836.                 (newname (cat #CDDevice_NC "0"))
  1837.                 (prompt #tp_copyprefs )
  1838.                 (help #th_copyprefs)
  1839.                 (confirm)
  1840.             )
  1841.     
  1842.             (copyfiles
  1843.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1844.                 (dest "ENVArc:AsimCDFS")
  1845.                 (newname (cat #CDDevice_NC "1"))
  1846.                 (prompt #tp_copyprefs )
  1847.                 (help #th_copyprefs)
  1848.                 (confirm)
  1849.             )
  1850.     
  1851.             (copyfiles
  1852.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1853.                 (dest "ENVArc:AsimCDFS")
  1854.                 (newname (cat #CDDevice_NC "2"))
  1855.                 (prompt #tp_copyprefs )
  1856.                 (help #th_copyprefs)
  1857.                 (confirm)
  1858.             )
  1859.     
  1860.             (copyfiles
  1861.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1862.                 (dest "ENVArc:AsimCDFS")
  1863.                 (newname (cat #CDDevice_NC "3"))
  1864.                 (prompt #tp_copyprefs )
  1865.                 (help #th_copyprefs)
  1866.                 (confirm)
  1867.             )
  1868.     
  1869.             (if (or #isNakamichi #isPioneer) 
  1870.             ((copyfiles
  1871.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1872.                 (dest "ENVArc:AsimCDFS")
  1873.                 (newname (cat #CDDevice_NC "4"))
  1874.                 (prompt #tp_copyprefs )
  1875.                 (help #th_copyprefs)
  1876.                 (confirm)
  1877.             )
  1878.     
  1879.             (copyfiles
  1880.                 (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1881.                 (dest "ENVArc:AsimCDFS")
  1882.                 (newname (cat #CDDevice_NC "5"))
  1883.                 (prompt #tp_copyprefs )
  1884.                 (help #th_copyprefs)
  1885.                 (confirm)
  1886.             )
  1887.  
  1888.             (if #isNakamichi
  1889.                 (copyfiles
  1890.                     (source "AsimCDFSInst:Default_Prefs/Pioneer_Separate")
  1891.                     (dest "ENVArc:AsimCDFS")
  1892.                     (newname (cat #CDDevice_NC "6"))
  1893.                     (prompt #tp_copyprefs )
  1894.                     (help #th_copyprefs)
  1895.                     (confirm)
  1896.                 ))))
  1897.             )
  1898.         )
  1899.             
  1900.         ;*****
  1901.         ;  Default prefs file for a Pioneer drive, pooled
  1902.         (if (not #PioneerSeparate)
  1903.             (
  1904.             (if #isPioneer
  1905.                 (copyfiles
  1906.                     (source "AsimCDFSInst:Default_Prefs/Pioneer_Pool")
  1907.                     (dest "ENVArc:AsimCDFS")
  1908.                     (newname #CDDevice_NC)
  1909.                     (prompt #tp_copyprefs )
  1910.                     (help #th_copyprefs)
  1911.                     (confirm)
  1912.                 ))
  1913.                 
  1914.             (if #IsNakamichi
  1915.                 (copyfiles
  1916.                     (source "AsimCDFSInst:Default_Prefs/Nakamichi_Pool")
  1917.                     (dest "ENVArc:AsimCDFS")
  1918.                     (newname #CDDevice_NC)
  1919.                     (prompt #tp_copyprefs )
  1920.                     (help #th_copyprefs)
  1921.                     (confirm)
  1922.                 ))
  1923.  
  1924.             (if #IsNakamichi4Disc
  1925.                 (copyfiles
  1926.                     (source "AsimCDFSInst:Default_Prefs/Nakamichi4_Pool")
  1927.                     (dest "ENVArc:AsimCDFS")
  1928.                     (newname #CDDevice_NC)
  1929.                     (prompt #tp_copyprefs )
  1930.                     (help #th_copyprefs)
  1931.                     (confirm)
  1932.                 ))
  1933.             )
  1934.         )        
  1935.     ))
  1936.     
  1937.     
  1938.     ;*****
  1939.     ;  Default prefs file for a SCSI CD-ROM drive
  1940.     (if (and (not #isNakamichi) (not #isPioneer))
  1941.         (copyfiles
  1942.             (source "AsimCDFSInst:Default_Prefs/Default")
  1943.             (dest "ENVArc:AsimCDFS")
  1944.             (newname #CDDevice_NC)
  1945.             (prompt #tp_copyprefs )
  1946.             (help #th_copyprefs)
  1947.             (confirm)
  1948.         )
  1949.     ))
  1950. )
  1951.  
  1952.  
  1953.  
  1954.  
  1955. ;*****
  1956. ;  Default prefs file for an ATAPI CD-ROM drive
  1957. (if (= #IsAmiga #typeATAPI)
  1958.     (
  1959.     (if (not #is4X4)        
  1960.         (copyfiles
  1961.             (source "AsimCDFSInst:Default_Prefs/ATAPI")
  1962.             (dest "ENVArc:AsimCDFS")
  1963.             (newname #CDDevice_NC)
  1964.             (prompt #tp_copyprefs )
  1965.             (help #th_copyprefs)
  1966.             (confirm)
  1967.         )
  1968.     )
  1969.  
  1970.     (if #is4X4
  1971.         ((if #PioneerSeparate
  1972.             ((copyfiles
  1973.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  1974.                 (dest "ENVArc:AsimCDFS")
  1975.                 (newname (cat #CDDevice_NC "0"))
  1976.                 (prompt #tp_copyprefs )
  1977.                 (help #th_copyprefs)
  1978.                 (confirm)
  1979.             )
  1980.     
  1981.             (copyfiles
  1982.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  1983.                 (dest "ENVArc:AsimCDFS")
  1984.                 (newname (cat #CDDevice_NC "1"))
  1985.                 (prompt #tp_copyprefs )
  1986.                 (help #th_copyprefs)
  1987.                 (confirm)
  1988.             )
  1989.     
  1990.             (copyfiles
  1991.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  1992.                 (dest "ENVArc:AsimCDFS")
  1993.                 (newname (cat #CDDevice_NC "2"))
  1994.                 (prompt #tp_copyprefs )
  1995.                 (help #th_copyprefs)
  1996.                 (confirm)
  1997.             )
  1998.     
  1999.             (copyfiles
  2000.                 (source "AsimCDFSInst:Default_Prefs/4X4_Separate")
  2001.                 (dest "ENVArc:AsimCDFS")
  2002.                 (newname (cat #CDDevice_NC "3"))
  2003.                 (prompt #tp_copyprefs )
  2004.                 (help #th_copyprefs)
  2005.                 (confirm)
  2006.             )
  2007.             )
  2008.         )
  2009.  
  2010.         (if (not #PioneerSeparate)
  2011.             (copyfiles
  2012.                 (source "AsimCDFSInst:Default_Prefs/4X4_Pooled")
  2013.                 (dest "ENVArc:AsimCDFS")
  2014.                 (newname #CDDevice_NC)
  2015.                 (prompt #tp_copyprefs )
  2016.                 (help #th_copyprefs)
  2017.                 (confirm)
  2018.             )
  2019.         ))
  2020.     )
  2021.     )
  2022. )
  2023.  
  2024.  
  2025. ;*****
  2026. ;  Default prefs file for a CDTV
  2027. (if (= #IsAmiga #typeCDTV)
  2028.     (copyfiles
  2029.         (source "AsimCDFSInst:Default_Prefs/CDTV")
  2030.         (dest "ENVArc:AsimCDFS")
  2031.         (newname #CDDevice_NC)
  2032.         (prompt #tp_copyprefs )
  2033.         (help #th_copyprefs)
  2034.         (confirm)
  2035.     )
  2036. )
  2037.  
  2038.  
  2039. ;*****
  2040. ;  Default prefs file for a CD³²
  2041. (if (= #IsAmiga #typeCD32)
  2042.     (copyfiles
  2043.         (source "AsimCDFSInst:Default_Prefs/CD³²")
  2044.         (dest "ENVArc:AsimCDFS")
  2045.         (newname #CDDevice_NC)
  2046.         (prompt #tp_copyprefs )
  2047.         (help #th_copyprefs)
  2048.         (confirm)
  2049.     )
  2050. )
  2051.  
  2052. (complete 28)
  2053.  
  2054.  
  2055.  
  2056. ;*****
  2057. ;  AsimTunes
  2058. (set #instTunes
  2059.     (askbool
  2060.         (prompt #tp_copytunes)
  2061.         (help #th_copytunes )
  2062.         (default 1)
  2063.     )
  2064. )
  2065.  
  2066. (if #instTunes 
  2067.     ((protect "AsimCDFS:AsimTunes" "rwed" )
  2068.     (protect "AsimCDFS:AsimTunes.info" "rwed" )
  2069.     (copyfiles
  2070.         (prompt #tp_copyingtunes )
  2071.         (source "AsimCDFSInst:AsimTunes")
  2072.         (dest "AsimCDFS:")
  2073.         (infos)
  2074.         (noposition)
  2075.         (help #th_copytunes)
  2076.         (confirm)
  2077.     )
  2078.     
  2079.     (tooltype
  2080.         (dest "AsimCDFS:AsimTunes" )
  2081.         (settooltype "CDROM" #CDDevice )
  2082.         (noposition)
  2083.     )
  2084.         
  2085.         
  2086.     (complete 31)
  2087.     (protect "fonts:AsimTunes2" "rwed" )
  2088.     (protect "fonts:AsimTunes2.font" "rwed" )
  2089.     (protect "fonts:AsimTunes2/11" "rwed" )
  2090.     (protect "fonts:AsimTunes2/20" "rwed" )
  2091.     (copyfiles
  2092.         (prompt #tp_copytunesfont )
  2093.         (source "AsimCDFSInst:fonts")
  2094.         (dest "fonts:" )
  2095.         (all)
  2096.         (help #th_copytunesfont )
  2097.         (confirm) )
  2098. ))
  2099.  
  2100.  
  2101.  
  2102. ;*****
  2103. ;  DiscChanger
  2104. (complete 34)
  2105.  
  2106. (set #instChanger
  2107.     (askbool
  2108.         (prompt #tp_copydc)
  2109.         (help #th_copydc )
  2110.         (default 1)
  2111.     )
  2112. )
  2113.  
  2114. (complete 37)
  2115. (if #instChanger
  2116.     ((protect "AsimCDFS:DiscChanger" "rwed" )
  2117.     (copyfiles
  2118.         (prompt #tp_copyingdc )
  2119.         (source "AsimCDFSInst:DiscChanger")
  2120.         (dest "AsimCDFS:")
  2121.         (infos)
  2122.         (noposition)
  2123.         (help #th_copydc)
  2124.         (confirm)
  2125.     )
  2126.     
  2127.     (tooltype
  2128.         (dest "AsimCDFS:DiscChanger" )
  2129.         (settooltype "CDROM" #CDDevice )
  2130.         (noposition)
  2131.     )
  2132. ))
  2133.  
  2134.  
  2135.  
  2136. ;*****
  2137. ;  PDFormat
  2138. (complete 38)
  2139.  
  2140. (if (= #isPDCD 1)
  2141.     (
  2142.     (set #instPDFormat
  2143.         (askbool
  2144.             (prompt #tp_copypd)
  2145.             (help #th_copypd )
  2146.             (default 1)
  2147.         )
  2148.     )
  2149.  
  2150.     (complete 39)
  2151.     (if #instPDFormat
  2152.         ((protect "AsimCDFS:PD_Format" "rwed" )
  2153.         (copyfiles
  2154.             (prompt #tp_copyingdc )
  2155.             (source "AsimCDFSInst:PD_Format")
  2156.             (dest "AsimCDFS:")
  2157.             (infos)
  2158.             (noposition)
  2159.             (help #th_copydc )
  2160.             (confirm)
  2161.         )
  2162.         
  2163.         (tooltype
  2164.             (dest "AsimCDFS:PD_Format" )
  2165.             (noposition)
  2166.         )
  2167.     ))
  2168. ))
  2169.  
  2170.  
  2171.  
  2172. ;*****
  2173. ;  AsimCDFS_Prefs
  2174. (complete 40)
  2175. (set #instPrefs
  2176.     (askbool
  2177.         (prompt #tp_copyasimprefs)
  2178.         (help  )
  2179.         (default 1)
  2180.     )
  2181. )
  2182.  
  2183. (complete 43)
  2184. (if #instPrefs
  2185.     ((protect "AsimCDFS:AsimCDFS_Prefs" "rwed" )
  2186.     (copyfiles
  2187.         (prompt  )
  2188.         (source "AsimCDFSInst:AsimCDFS_Prefs")
  2189.         (dest "AsimCDFS:")
  2190.         (infos)
  2191.         (noposition)
  2192.         (help #th_copyasimprefs )
  2193.         (confirm)
  2194.     )
  2195. ))
  2196.  
  2197.  
  2198.  
  2199.  
  2200. ;*****
  2201. ;  SimBoot
  2202. (complete 46)
  2203. (set #instSimBoot
  2204.     (askbool
  2205.         (prompt #tp_copysimboot)
  2206.         (help #th_copysimboot )
  2207.         (default 1)
  2208.     )
  2209. )
  2210.  
  2211. (complete 50)
  2212. (if #instSimBoot
  2213.     ((protect "AsimCDFS:SimBoot" "rwed" )
  2214.     (copyfiles
  2215.         (prompt #th_copyingsimboot )
  2216.         (source "AsimCDFSInst:SimBoot")
  2217.         (dest "AsimCDFS:")
  2218.         (infos)
  2219.         (noposition)
  2220.         (help #th_copysimboot )
  2221.         (confirm)
  2222.     )
  2223.  
  2224. ))
  2225.  
  2226.  
  2227. ;*****
  2228. ;  CD³²_Prefs
  2229. (complete 53)
  2230. (set #instCD32Prefs
  2231.     (askbool
  2232.         (prompt #tp_copycd32prefs)
  2233.         (help #th_copycd32prefs )
  2234.         (default 1)
  2235.     )
  2236. )
  2237.  
  2238. (complete 56)
  2239. (if #instCD32Prefs
  2240.     ((protect "AsimCDFS:CD³²_Prefs" "rwed" )
  2241.     (copyfiles
  2242.         (prompt #tp_copyingcd32prefs )
  2243.         (source "AsimCDFSInst:CD³²_Prefs")
  2244.         (dest "AsimCDFS:")
  2245.         (infos)
  2246.         (noposition)
  2247.         (help #th_copycd32prefs )
  2248.         (confirm)
  2249.     )
  2250.  
  2251. ))
  2252.  
  2253.  
  2254.  
  2255. ;*****
  2256. ;  CDTV Prefs
  2257. (complete 59)
  2258. (set #instCDTVPrefs
  2259.     (askbool
  2260.         (prompt #tp_copycdtvprefs)
  2261.         (help #th_copycdtvprefs )
  2262.         (default 1)
  2263.     )
  2264. )
  2265.  
  2266. (complete 62)
  2267. (if #instCDTVPrefs
  2268.     ((protect "AsimCDFS:CDTV_Prefs" "rwed" )
  2269.     (copyfiles
  2270.         (prompt #tp_copyingcdtvprefs )
  2271.         (source "AsimCDFSInst:CDTV_Prefs")
  2272.         (dest "AsimCDFS:")
  2273.         (infos)
  2274.         (noposition)
  2275.         (help #th_copycdtvprefs )
  2276.         (confirm)
  2277.     )
  2278.  
  2279. ))
  2280.  
  2281.  
  2282.  
  2283. (complete 65)
  2284. (set #instCDTVEmul
  2285.     (askbool
  2286.         (prompt #tp_copycdtvemul)
  2287.         (help #th_copycdtvemul )
  2288.         (default 1)
  2289.     )
  2290. )
  2291.  
  2292. (complete 68)
  2293. (if #instCDTVEmul
  2294.     ((complete 71)
  2295.     ;********************
  2296.     ;  devs:cdtv.device, devs:bookmark.device, devs:cardmark.device
  2297.     (protect "devs:cdtv.device" "rwed" )
  2298.     (protect "devs:bookmark.device" "rwed" )
  2299.     (protect "devs:cardmark.device" "rwed" )
  2300.  
  2301.     (run "AsimCDFSInst:c/lx e AsimCDFSInst:devs/cdtv.lha devs:"
  2302.         (prompt #tp_copycdtvdevice )
  2303.         (confirm)
  2304.         (help #th_copycdtvemul )
  2305.     )
  2306.  
  2307.     ;*****
  2308.     ;  libs:playerprefs.library
  2309.     (complete 81)
  2310.     (protect "devs:playerprefs.library" "rwed" )
  2311.     (copyfiles
  2312.         (prompt #tp_copyplayerprefs )
  2313.         (source "AsimCDFSInst:libs/playerprefs.library")
  2314.         (dest "libs:")
  2315.         (confirm)
  2316.         (help #th_copycdtvemul )
  2317.     )
  2318. ))    
  2319.  
  2320.  
  2321.  
  2322. (set #instCD32Emul
  2323.     (askbool
  2324.         (prompt #tp_copycd32emul)
  2325.         (help #th_copycd32emul )
  2326.         (default 1)
  2327.     )
  2328. )
  2329.  
  2330. (complete 84)
  2331. (if #instCD32Emul
  2332.     ((complete 87)
  2333.     ;*****
  2334.     ;  devs:cd.device
  2335.     
  2336.     (protect "devs:cd.device" "rwed" )
  2337.     (copyfiles
  2338.         (prompt #tp_copycddevice )
  2339.         (source "AsimCDFSInst:devs/cd.device")
  2340.         (dest "devs:")
  2341.         (confirm)
  2342.         (help #th_copycd32emul )
  2343.     )
  2344.     
  2345.     
  2346.     ;*****
  2347.     ;  libs:nonvolatile.library
  2348.     (complete 90)
  2349.     (protect "devs:nonvolatile.library" "rwed" )
  2350.     (copyfiles
  2351.         (prompt #tp_copynv )
  2352.         (source "AsimCDFSInst:libs/nonvolatile.library")
  2353.         (dest "libs:")
  2354.         (confirm)
  2355.         (help #th_copycd32emul )
  2356.     )
  2357.     
  2358.     
  2359.     ;*****
  2360.     ;  libs:lowlevel.library
  2361.     (complete 93)
  2362.     (protect "devs:lowlevel.library" "rwed" )
  2363.     (copyfiles
  2364.         (prompt #tp_copylowlevel )
  2365.         (source "AsimCDFSInst:libs/lowlevel.library")
  2366.         (dest "libs:")
  2367.         (confirm)
  2368.         (help #th_copycd32emul )
  2369.     )
  2370. ))
  2371.  
  2372.  
  2373.  
  2374. ;*****
  2375. ;  default icons in ENV
  2376.  
  2377. (makedir "ENVARC:AsimCDFS"
  2378.     (prompt #tp_makeenvarc)
  2379.     (help #th_makeenvarc)
  2380.     )
  2381.  
  2382. (makedir "ENV:AsimCDFS"
  2383.     (prompt #tp_makeenv)
  2384.     (help #th_makeenv)
  2385.     )
  2386.  
  2387. (copyfiles
  2388.     (source "AsimCDFSInst:ENVArc/AsimCDFS")
  2389.     (dest "ENVArc:AsimCDFS")
  2390.     (infos)
  2391.     (all)
  2392.     (prompt #tp_copyicons )
  2393.     (help #th_copyicons)
  2394.     (confirm)
  2395. )
  2396.  
  2397. (copyfiles
  2398.     (source "AsimCDFSInst:ENVArc/AsimCDFS")
  2399.     (dest "ENV:AsimCDFS")
  2400.     (infos)
  2401.     (all)
  2402.     (prompt #tp_copyicons )
  2403.     (help #th_copyicons)
  2404.     (confirm)
  2405. )
  2406.  
  2407.  
  2408.  
  2409.  
  2410. ;*****
  2411. ;  ask which languages to be added
  2412. (if (exists "LOCALE:" (noreq))
  2413.     ((user 2)
  2414.     (set #language
  2415.         (askoptions
  2416.             (prompt #tp_catalogs)
  2417.             (help #th_catalogs )
  2418.             (choices "Deutsch" "Français" "Italiano")
  2419.             (default (shiftleft 1 (- #our_language 1)) )
  2420.         )
  2421.     )
  2422.     (user #theirlevel)
  2423.     
  2424.     
  2425.     (set n 0)
  2426.     (while
  2427.         (set #langdir
  2428.             (select n "deutsch"
  2429.                          "français"
  2430.                        "italiano"
  2431.                        ""
  2432.                 )
  2433.             )
  2434.         (
  2435.         
  2436.         (if (IN #language n)
  2437.             ((set #langdest (tackon "LOCALE:catalogs/" #langdir))
  2438.             (set #langsrc (tackon "AsimCDFSInst:catalogs/" #langdir))
  2439.             
  2440.             (run (cat "AsimCDFSInst:c/lx e " (tackon #langsrc "Catalogs.lha") " " #langdest)
  2441.                 (prompt #tp_copylocale1 #langdir #tp_copylocale2 )
  2442.                 (help #th_copylocale)
  2443.                 (confirm))
  2444.  
  2445.             (copyfiles
  2446.                 (prompt #tp_copylocale1 #langdir #tp_copylocale2 )
  2447.                 (source (tackon #langsrc "SCSIInquire.catalog") )
  2448.                 (dest #langdest)
  2449.                 (help #th_copylocale)
  2450.                 (confirm))
  2451.             )
  2452.         )
  2453.     
  2454.         (set n (+ n 1))
  2455.         )
  2456.     )
  2457. ))    
  2458.  
  2459.  
  2460.     
  2461.  
  2462.  
  2463.  
  2464.  
  2465. ;*****
  2466. ;  Create a 'SYS/NV_Location' environment variable
  2467. (run "setenv SYS/NV_Location AsimCDFS_Buffer:NonVolatile/")
  2468.  
  2469.  
  2470. ;*****
  2471. ;  Create a CD³² Preferences file
  2472. (run "AsimCDFS:CD³²_Prefs SAVE DEFAULT")    
  2473.  
  2474.  
  2475. ;*****
  2476. ;  Create a CDTV Preferences file
  2477. (run "AsimCDFS:CDTV_Prefs SAVE DEFAULT")    
  2478.  
  2479.  
  2480. ;*****
  2481. ;  Tell NewTek Flyer users where the CD-ROM drive is located
  2482. (if (= #IsAmiga #typeFLYER) 
  2483.     (
  2484.     (user 2)
  2485.     (message #text_message_flyer    )
  2486.     
  2487.     (user #theirlevel)
  2488.     )
  2489. )
  2490.  
  2491.  
  2492.  
  2493. ;*****
  2494. ;  Tell About Extended icons
  2495. (user 2)
  2496. (message #text_message_extendedicons)
  2497. (user #theirlevel)
  2498.  
  2499.  
  2500. ;*****
  2501. ;  remove assign to AsimCDFSInst
  2502. (makeassign "AsimCDFSInst")
  2503. (makeassign "AsimCDFS")
  2504. (makeassign "AsimCDFS_Buffer")
  2505.  
  2506.  
  2507. (complete 100)
  2508.